X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2e66dde525c12d064518c316d25a6b41ed727b39..c7f211c743829e058b9e8ddf8e30428c934a433b:/SL/AM.pm diff --git a/SL/AM.pm b/SL/AM.pm index bc6c8266e..e2ea0be0e 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -1062,8 +1062,7 @@ sub save_preferences { my $user = SL::DB::Manager::AuthUser->find_by(login => $form->{login}); $user->update_attributes( config_values => { - map({ ($_ => $form->{$_}) } SL::DB::AuthUser::CONFIG_VARS()), - map({ ($_ => do { my $v = $form->{$_}; $v =~ s/\r//g; $v }) } qw(address signature)), + map { ($_ => $form->{$_}) } SL::DB::AuthUser::CONFIG_VARS(), }); $main::lxdebug->leave_sub();