X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/6b935d522a38e1a20802c25ed51a15e0cd292c1d..a354dfceab313ce89c8739fdb3243183f2bbefbe:/SL/BackgroundJob/Test.pm 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;