X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FTemplate%2FPlugin%2FHTMLFixes.pm;h=fad69932a9fe5ff4f440603fc8d08fbf463c136b;hb=824f9ddf5ac3c5d8f46fa8a3bcd49456aa9f0e22;hp=32d3c56835cd71ed856226355f6aeb75fcc5e97e;hpb=20a76c43821e96a4ee9b6d43e976241974fefb11;p=kivitendo-erp.git diff --git a/SL/Template/Plugin/HTMLFixes.pm b/SL/Template/Plugin/HTMLFixes.pm index 32d3c5683..fad69932a 100644 --- a/SL/Template/Plugin/HTMLFixes.pm +++ b/SL/Template/Plugin/HTMLFixes.pm @@ -12,7 +12,7 @@ use Encode; # Replacement for Template::Plugin::HTML::url. -# Strings in Lx-Office are stored in Perl's internal encoding but have +# Strings in kivitendo are stored in Perl's internal encoding but have # to be output as UTF-8. A normal regex replace doesn't do that # creating invalid UTF-8 characters upon URL-unescaping. @@ -21,7 +21,7 @@ no warnings 'redefine'; sub url { my ($self, $text) = @_; return undef unless defined $text; - $text = Encode::encode('utf-8-strict', $text) if $::locale && $::locale->is_utf8; + $text = Encode::encode('utf-8-strict', $text); $text =~ s/([^a-zA-Z0-9_.-])/uc sprintf("%%%02x",ord($1))/eg; return $text; }