X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/fa7fc7eeb3ca718914affee06c0629a08d571288..f63bc3db2b0dc62707d4fc75d882e68c06bbcec5:/SL/Dispatcher/AuthHandler/User.pm diff --git a/SL/Dispatcher/AuthHandler/User.pm b/SL/Dispatcher/AuthHandler/User.pm index 7a8fd1d75..ba5071a1d 100644 --- a/SL/Dispatcher/AuthHandler/User.pm +++ b/SL/Dispatcher/AuthHandler/User.pm @@ -14,7 +14,7 @@ sub handle { my $client_id = $::form->{'{AUTH}client_id'} || $::auth->get_session_value('client_id'); return $self->_error(%param) if !$client_id || !$::auth->set_client($client_id); - %::myconfig = $::auth->read_user(login => $login); + %::myconfig = User->get_default_myconfig($::auth->read_user(login => $login)); return $self->_error(%param) unless $::myconfig{login}; @@ -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; }