Formularfelder und Session-Keys für Logins umbenannt

[mfinanz.git] / SL / Dispatcher.pm

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 8301e56029d903500985df9efe00bf50e8858e7f..747da04854ede10bf7998bafb00b49fc14e76550 100644 (file)
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -214,6 +214,8 @@ sub handle_request {
         action       => $action,
       );
 
+      delete @{ $::form }{ grep { m/^\{AUTH\}/ } keys %{ $::form } };
+
       if ($action) {
         $::instance_conf->init if $auth_level eq 'user';