X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/bc2b5fe6f8ceae8fd4135c0e44a5329cc22edfca..cdd986acf8d8575920edf3c4c5351dbc561a8e64:/scripts/task_server.pl

diff --git a/scripts/task_server.pl b/scripts/task_server.pl
index 2f3339ccb..c9494c8e0 100755
--- a/scripts/task_server.pl
+++ b/scripts/task_server.pl
@@ -25,7 +25,7 @@ use SL::Auth;
 use SL::DBUpgrade2;
 use SL::DB::AuthClient;
 use SL::DB::BackgroundJob;
-use SL::Dispatcher;
+use SL::System::Process;
 use SL::BackgroundJob::ALL;
 use SL::Form;
 use SL::Helper::DateTime;
@@ -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);
     }
 
@@ -332,7 +332,8 @@ sub gd_run {
 
     clean_before_sleeping();
 
-    if (SL::Dispatcher::_memory_usage_is_too_high()) {
+    if (SL::System::Process::memory_usage_is_too_high()) {
+      debug("Memory usage too high - exiting.");
       return;
     }