X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c3bbf6d39e066523cdc2bb96e057d6adbfcdf4c7..8ae2bc4fb4c72f3ac907a3e47c0cbd5da23f62c5:/SL/Dispatcher.pm

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 9adde75ba..d01a0d03b 100644
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -241,6 +241,8 @@ sub handle_request {
         action       => $action,
       );
 
+      ::end_of_request() unless $auth_result{auth_ok};
+
       delete @{ $::form }{ grep { m/^\{AUTH\}/ } keys %{ $::form } } unless $auth_result{keep_auth_vars};
 
       if ($action) {