X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b8ede741b1a02521453237e37c5a46fcf9042576..ad033a768bbe46566afa159008c42ff7fc6bb35a:/SL/AM.pm

diff --git a/SL/AM.pm b/SL/AM.pm
index d5c38ae50..7306640b8 100644
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -829,10 +829,10 @@ sub save_preferences {
 
   my ($self, $form) = @_;
 
-  my $employee = SL::DB::Manager::Employee->find_by(login => $form->{login});
+  my $employee = SL::DB::Manager::Employee->find_by(login => $::myconfig{login});
   $employee->update_attributes(name => $form->{name});
 
-  my $user = SL::DB::Manager::AuthUser->find_by(login => $form->{login});
+  my $user = SL::DB::Manager::AuthUser->find_by(login => $::myconfig{login});
   $user->update_attributes(
     config_values => {
       %{ $user->config_values },