X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/2a496ad85e9117b7cfaaa315b208f478eba30ffd..38bb9635fde8c2821c23da931bcb6acba8e4b8be:/SL/Dispatcher/AuthHandler/User.pm?ds=inline diff --git a/SL/Dispatcher/AuthHandler/User.pm b/SL/Dispatcher/AuthHandler/User.pm index 3748dc110..bd3d29e21 100644 --- a/SL/Dispatcher/AuthHandler/User.pm +++ b/SL/Dispatcher/AuthHandler/User.pm @@ -43,10 +43,10 @@ sub handle { } sub _error { - my $self = shift; + my ($self, %param) = @_; $::auth->punish_wrong_login; - $::dispatcher->handle_login_error(error => 'password'); + $::dispatcher->handle_login_error(%param, error => 'password'); return 0; }