X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/69f51bf0aaf0fcfa23a732f7524168f52e67bd5c..b8376fbae07f5b6f2077c2d3cf283c345a5c94c3:/SL/Dispatcher/AuthHandler/User.pm 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; }