kein use SL::DB::Object in SL::DB::Object
authorSven Schöling <s.schoeling@linet-services.de>
Thu, 20 Jun 2013 17:01:13 +0000 (19:01 +0200)
committerSven Schöling <s.schoeling@linet-services.de>
Tue, 25 Jun 2013 12:22:31 +0000 (14:22 +0200)
SL/DB/BackgroundJob.pm

index c838685..f5c4b21 100644 (file)
@@ -5,10 +5,8 @@ use strict;
 use DateTime::Event::Cron;
 use English qw(-no_match_vars);
 
-require SL::DB::MetaSetup::BackgroundJob;
-require SL::DB::Manager::BackgroundJob;
-
-require SL::DB::BackgroundJobHistory;
+use SL::DB::MetaSetup::BackgroundJob;
+use SL::DB::Manager::BackgroundJob;
 
 use SL::System::Process;
 
@@ -36,6 +34,8 @@ sub run {
   my $run_at  = DateTime->now_local;
   my $history;
 
+  require SL::DB::BackgroundJobHistory;
+
   my $ok = eval {
     eval "require $package" or die $@;
     my $result = $package->new->run($self);