From: Don Armstrong <don@donarmstrong.com>
Date: Sat, 7 Jul 2012 18:57:32 +0000 (-0700)
Subject: decode_rfc1522 now outputs perl internal format
X-Git-Tag: release/2.6.0~376^2~6
X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=b327c4b84c2024fca0a211e0cfd5e272281efb53

decode_rfc1522 now outputs perl internal format
---

diff --git a/Debbugs/MIME.pm b/Debbugs/MIME.pm
index 6406276..bc47ca3 100644
--- a/Debbugs/MIME.pm
+++ b/Debbugs/MIME.pm
@@ -229,9 +229,7 @@ sub convert_to_utf8 {
      return $data if $charset eq 'raw' or is_utf8($data,1);
      my $result;
      eval {
-	  # this encode/decode madness is to make sure that the data
-	  # really is valid utf8 and that the is_utf8 flag is off.
-	  $result = encode("utf8",decode($charset,$data))
+	 $result = decode($charset,$data);
      };
      if ($@) {
 	  warn "Unable to decode charset; '$charset' and '$data': $@";