Request: Fehler in recode_recursively

Fix zu Bug 1774.

diff --git a/SL/Request.pm b/SL/Request.pm
index d4f2d88501b43a99208ea032ae6f8f653c83490c..dab57457a062080ae32fa6302c9841e4a3b2c674 100644 (file)
--- a/SL/Request.pm
+++ b/SL/Request.pm
@@ -165,7 +165,7 @@ sub _recode_recursively {
         # Workaround for a bug: converting $from->[$idx] directly
         # leads to 'undef'. I don't know why. Converting a copy works,
         # though.
-        $from->[$idx] = $iconv->convert("" . $from->[$idx]);
+        $to->[$idx] = $iconv->convert("" . $from->[$idx]);
       } else {
         $to->[$idx] ||= {} if 'HASH'  eq ref $from->[$idx];
         $to->[$idx] ||= [] if 'ARRAY' eq ref $from->[$idx];