X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FBackgroundJob%2FTest.pm;h=a70b7a3c52fba0ce45bbb503e4fe6fe2f3366f0a;hb=d58b1a04c2facd0a4484cf2b801b27b9741cce26;hp=f79a1b586f1467b25ec1e572da2949e65cd85f51;hpb=d099ba109329ea13ce350995ddcefe10d065641d;p=kivitendo-erp.git diff --git a/SL/BackgroundJob/Test.pm b/SL/BackgroundJob/Test.pm index f79a1b586..a70b7a3c5 100644 --- a/SL/BackgroundJob/Test.pm +++ b/SL/BackgroundJob/Test.pm @@ -4,11 +4,17 @@ 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 ID " . $db_obj->id . " is being executed on node " . SL::System::TaskServer::node_id() . "."); + + die "Oh cruel world: " . $data->{exception} if $data->{exception}; - $::lxdebug->message(0, "Test job is being executed."); + return exists $data->{result} ? $data->{result} : 1; } 1;