Benutzerpräferenzen speichern ging kaputt.

diff --git a/SL/AM.pm b/SL/AM.pm
index 67c3c20..59e9c78 100644 (file)
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -1116,7 +1116,7 @@ sub save_preferences {
 
   $form->{businessnumber} =  $businessnumber;
 
-  $myconfig = new User($form->{login});
+  $myconfig = User->new(login => $form->{login});
 
   foreach my $item (keys %$form) {
     $myconfig->{$item} = $form->{$item};