]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/admin.pl
User-Login auf Controller umgestellt
[mfinanz.git] / bin / mozilla / admin.pl
index 42971fac512c4bc5825e4aeffcbd149cdbf2f4f2..4409505c1f86f184ed69332aaafc5e3a52c5bb92 100755 (executable)
@@ -96,6 +96,7 @@ sub run {
 
   if ($form->{action}) {
     if ($auth->authenticate_root($form->{'{AUTH}admin_password'}) != $auth->OK()) {
+      $auth->punish_wrong_login;
       $form->{error_message} = $locale->text('Incorrect Password!');
       $auth->delete_session_value('admin_password');
       adminlogin();