X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d8ac08282dad52789b8bea785e8cddae44085483..90bb521a25eeb37c5bbae1ff68c38e6c142b6e6b:/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;