X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/33823a7743de188f6e37802716ee5bd877a3ec5f..b084886b68e6eb9e5d25605894641ce24ae23473:/SL/AM.pm diff --git a/SL/AM.pm b/SL/AM.pm index 57e6b445a..9780078f5 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -556,7 +556,7 @@ sub save_preferences { my ($self, $form) = @_; - my $employee = SL::DB::Manager::Employee->find_by(login => $::myconfig{login}); + my $employee = SL::DB::Manager::Employee->current; $employee->update_attributes(name => $form->{name}); my $user = SL::DB::Manager::AuthUser->find_by(login => $::myconfig{login});