X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FBackgroundJob%2FTest.pm;h=a70b7a3c52fba0ce45bbb503e4fe6fe2f3366f0a;hb=24af0d9994b2d7e00d740b6bb6e698c68ebc96a4;hp=01c8569b476a14b24fb490465543439164be5175;hpb=ee71ba3372b47b7de1e30d56db92c1315ae1e104;p=kivitendo-erp.git

diff --git a/SL/BackgroundJob/Test.pm b/SL/BackgroundJob/Test.pm
index 01c8569b4..a70b7a3c5 100644
--- a/SL/BackgroundJob/Test.pm
+++ b/SL/BackgroundJob/Test.pm
@@ -1,13 +1,20 @@
 package SL::BackgroundJob::Test;
 
+use strict;
+
 use parent qw(SL::BackgroundJob::Base);
 
+use SL::System::TaskServer;
+
 sub run {
-  my $self   = shift;
-  my $db_obj = shift;
+  my ($self, $db_obj) = @_;
+  my $data            = $db_obj->data_as_hash;
 
-  $::lxdebug->message(0, "Test job is being executed.");
-}
+  $::lxdebug->message(0, "Test job ID " . $db_obj->id . " is being executed on node " . SL::System::TaskServer::node_id() . ".");
 
+  die "Oh cruel world: " . $data->{exception} if $data->{exception};
+
+  return exists $data->{result} ? $data->{result} : 1;
+}
 
 1;