X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/00b74acf8783d30c5add1d381cd46b70031fa4bb..eabfa79517bccb2dd56220ffd7f381605944bc7f:/SL/AM.pm?ds=inline

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});