[Rt-commit] r4949 - in rtir/branches/1.9-EXPERIMENTAL: etc

[alexmv at bestpractical.com]

Author: alexmv
Date: Tue Apr  4 12:52:48 2006
New Revision: 4949

Modified:
   rtir/branches/1.9-EXPERIMENTAL/   (props changed)
   rtir/branches/1.9-EXPERIMENTAL/etc/initialdata

Log:
 r12120 at zoq-fot-pik:  chmrr | 2006-04-04 12:52:38 -0400
  * Fail fast, and with a nicer error message.


Modified: rtir/branches/1.9-EXPERIMENTAL/etc/initialdata
==============================================================================
--- rtir/branches/1.9-EXPERIMENTAL/etc/initialdata	(original)
+++ rtir/branches/1.9-EXPERIMENTAL/etc/initialdata	Tue Apr  4 12:52:48 2006
@@ -1,5 +1,12 @@
 # Initial data for a fresh RTIR Installation.
 
+ at Initial = ( sub {
+    eval { require RT::FM; };
+    if ($@) {
+        die "RTIR is built on top of RTFM; please install RTFM before continuing.\n";
+    }
+} );
+
 @Queues = (
     {
         Name              => 'Incidents',
@@ -764,9 +771,6 @@
 } );
 
 @Final = ( sub {
-    eval { require RT::FM; };
-    die "You must install RTFM!" if $@;
-
     $| = 1;
     my $CurrentUser = RT::CurrentUser->new();
     $CurrentUser->LoadByName('RT_System');