[Rt-commit] r10369 - in rt/branches/3.7-EXPERIMENTAL: . lib

ruz at bestpractical.com ruz at bestpractical.com
Wed Jan 16 10:44:19 EST 2008


Author: ruz
Date: Wed Jan 16 10:44:19 2008
New Revision: 10369

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Config.pm

Log:
 r10371 at cubic-pc (orig r10337):  ruz | 2008-01-14 02:09:08 +0300
 * revert the latest change


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT.pm.in	Wed Jan 16 10:44:19 2008
@@ -52,7 +52,7 @@
 
 use File::Spec ();
 
-use vars qw($Config $System $SystemUser $Nobody $Handle $Logger %InitCallbacks);
+use vars qw($Config $System $SystemUser $Nobody $Handle $Logger);
 
 our $VERSION = '@RT_VERSION_MAJOR at .@RT_VERSION_MINOR at .@RT_VERSION_PATCH@';
 
@@ -143,8 +143,7 @@
     ConnectToDatabase();
     InitSystemObjects();
     InitClasses();
-    InitLogging();
-    $_->() foreach @{ $InitCallbacks{'Init'} || [] };
+    InitLogging(); 
     InitPlugins();
 }
 
@@ -419,7 +418,6 @@
         RT::ObjectCustomFieldValue
         RT::Attribute
     );
-    $_->() foreach @{ $InitCallbacks{'InitClasses'} || [] };
 }
 
 =head2 InitSystemObjects
@@ -442,8 +440,6 @@
 
     require RT::System;
     $System = new RT::System;
-
-    $_->() foreach @{ $InitCallbacks{'InitSystemObjects'} || [] };
 }
 
 =head1 CLASS METHODS

Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Config.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Config.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Config.pm	Wed Jan 16 10:44:19 2008
@@ -279,10 +279,6 @@
                 Extension  => $is_ext,
             );
         };
-        local *Register = sub {
-            my ($type, $cb) = @_;
-            push @{ $RT::InitCallbacks{ $type } ||=[] }, $cb;
-        };
         local @INC = ($RT::LocalEtcPath, $RT::EtcPath, @INC);
         require $args{'File'};
     };


More information about the Rt-commit mailing list