X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b6fd15a8dc44f9b09d5a2bce766cda14b87c6e13..3d1ae2d96b65e88a5b12dde2b2524dc10f7932fa:/SL/Dispatcher.pm diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm index 35a351877..44631a046 100644 --- a/SL/Dispatcher.pm +++ b/SL/Dispatcher.pm @@ -82,7 +82,7 @@ sub show_error { $::form->{error} = $::locale->text('The session is invalid or has expired.') if ($error_type eq 'session'); $::form->{error} = $::locale->text('Incorrect password!') if ($error_type eq 'password'); - $::form->header(no_menu => 1); + $::form->header; print $::form->parse_html_template($template, \%params); $::lxdebug->leave_sub; @@ -231,6 +231,7 @@ sub handle_request { } else { if (SL::Auth::SESSION_EXPIRED == $session_result) { print $::request->{cgi}->redirect('controller.pl?action=LoginScreen/user_login&error=session'); + ::end_of_request(); } my %auth_result = $self->{auth_handler}->handle( @@ -240,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) {