X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAM.pm;h=cf48de61cda01ee12944e8c792b6568bb4286958;hb=3d4d1eee53465ad4cc4895944e27b1b056f816e7;hp=bc6c8266e28f54a54a560c3f8dc13453176343b6;hpb=2e66dde525c12d064518c316d25a6b41ed727b39;p=kivitendo-erp.git diff --git a/SL/AM.pm b/SL/AM.pm index bc6c8266e..cf48de61c 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -1021,7 +1021,7 @@ sub load_template { close(TEMPLATE); } - $content = Encode::decode('utf-8-strict', $content) if $::locale->is_utf8; + $content = Encode::decode('utf-8-strict', $content); $main::lxdebug->leave_sub(); @@ -1038,7 +1038,7 @@ sub save_template { my $error = ""; if (open(TEMPLATE, ">", $filename)) { - $content = Encode::encode('utf-8-strict', $content) if $::locale->is_utf8; + $content = Encode::encode('utf-8-strict', $content); $content =~ s/\r\n/\n/g; print(TEMPLATE $content); close(TEMPLATE); @@ -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();