X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a680ea0c9d138dc94575c9fa94214d01ef7cd1a6..24f6b9ed716e385fa26ca68b1d78bd1969b22fcd:/SL/Dispatcher.pm?ds=sidebyside

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 632202735..ec6da1beb 100644
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -226,14 +226,17 @@ sub _run_controller {
 sub handle_all_requests {
   my ($self) = @_;
 
+  my $restart;
   my $request = FCGI::Request();
   while ($request->Accept() >= 0) {
     $self->handle_request($request);
-    if (_memory_usage_is_too_high()) {
-      $request->Flush();
-      last;
+    if (($self->interface_type eq 'FastCGI') && _memory_usage_is_too_high()) {
+      $request->LastCall();
+      $restart = 1;
     }
   }
+
+  exec $0 if $restart;
 }
 
 sub handle_request {