X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c904f865b0f9d1da094f2ca5198796829277d8e4..6d6c50b47f599d04634b24914d222d461b728759:/SL/Dispatcher.pm diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm index 1261aa72b..4b25ca749 100644 --- a/SL/Dispatcher.pm +++ b/SL/Dispatcher.pm @@ -251,6 +251,9 @@ sub handle_request { if (($script eq 'login') && !$action) { print $::request->{cgi}->redirect('controller.pl?action=LoginScreen/user_login'); + } elsif ($script eq 'admin') { + ::run($session_result); + } else { $self->redirect_to_login($script) if SL::Auth::SESSION_EXPIRED == $session_result;