X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/313367d361bdc37ebad9647a82a437eedbf45ef4..bcc996e65643:/SL/Dispatcher/AuthHandler/User.pm?ds=inline diff --git a/SL/Dispatcher/AuthHandler/User.pm b/SL/Dispatcher/AuthHandler/User.pm index a1a5bdc84..ba5071a1d 100644 --- a/SL/Dispatcher/AuthHandler/User.pm +++ b/SL/Dispatcher/AuthHandler/User.pm @@ -38,7 +38,9 @@ sub _error { my $self = shift; $::auth->punish_wrong_login; - print $::request->{cgi}->redirect('controller.pl?action=LoginScreen/user_login&error=password'); + + require SL::Controller::Base; + SL::Controller::Base->new->redirect_to('controller.pl?action=LoginScreen/user_login&error=password'); return 0; }