Beim URL-Unescapen von UTF-8 ins internen Encoding wandeln, sofern benötigt

Fix für Bug 1583.

diff --git a/SL/Form.pm b/SL/Form.pm
index 81d6dc4..6b1ee50 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -394,6 +394,7 @@ sub unescape {
   $str =~ s/\\$//;
 
   $str =~ s/%([0-9a-fA-Z]{2})/pack("c",hex($1))/eg;
+  $str =  Encode::decode('utf-8-strict', $str) if $::locale->is_utf8;
 
   $main::lxdebug->leave_sub(2);