X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/253d756269c58fc019073c2d8da597f9f9b65e48..80970e1dbc30a1e8d56f924ba5699d1868d48d22:/scripts/task_server.pl diff --git a/scripts/task_server.pl b/scripts/task_server.pl index 7236deaf6..3d2814928 100755 --- a/scripts/task_server.pl +++ b/scripts/task_server.pl @@ -263,7 +263,7 @@ sub run_single_job_for_all_clients { if (!$ok) { my $error = $EVAL_ERROR; - debug("Exception during execution: ${error}"); + $::lxdebug->message(LXDebug::WARN(), "Exception during execution: ${error}"); notify_on_failure(exception => $error); } @@ -309,7 +309,7 @@ sub run_once_for_all_clients { if (!$ok) { my $error = $EVAL_ERROR; - debug("Exception during execution: ${error}"); + $::lxdebug->message(LXDebug::WARN(), "Exception during execution: ${error}"); notify_on_failure(exception => $error); } @@ -322,6 +322,7 @@ sub gd_run { run_single_job_for_all_clients(); return; } + $::lxdebug->message(LXDebug::INFO(), "The task server for node " . SL::System::TaskServer::node_id() . " is up and running."); while (1) { $SIG{'ALRM'} = 'IGNORE'; @@ -333,6 +334,7 @@ sub gd_run { clean_before_sleeping(); if (SL::System::Process::memory_usage_is_too_high()) { + debug("Memory usage too high - exiting."); return; }