[Rt-commit] r19400 - in rt/3.8/trunk: t/web

[ruz at bestpractical.com]

Author: ruz
Date: Fri May  1 16:13:04 2009
New Revision: 19400

Modified:
   rt/3.8/trunk/lib/RT/Attachment_Overlay.pm
   rt/3.8/trunk/t/web/rest-non-ascii-subject.t

Log:
* fix t/web/rest-non-ascii-subject.t

Modified: rt/3.8/trunk/lib/RT/Attachment_Overlay.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/Attachment_Overlay.pm	(original)
+++ rt/3.8/trunk/lib/RT/Attachment_Overlay.pm	Fri May  1 16:13:04 2009
@@ -134,8 +134,7 @@
 
     # MIME::Head doesn't support perl strings well and can return
     # octets which later will be double encoded in low-level code
-    my $head = $Attachment->head->as_string;
-    utf8::decode( $head );
+    my $head = Encode::decode_utf8($Attachment->head->as_string);
 
     # If a message has no bodyhandle, that means that it has subparts (or appears to)
     # and we should act accordingly.  

Modified: rt/3.8/trunk/t/web/rest-non-ascii-subject.t
==============================================================================
--- rt/3.8/trunk/t/web/rest-non-ascii-subject.t	(original)
+++ rt/3.8/trunk/t/web/rest-non-ascii-subject.t	Fri May  1 16:13:04 2009
@@ -5,6 +5,8 @@
 use Test::More tests => 7;
 use RT::Test;
 
+local $RT::Test::SKIP_REQUEST_WORK_AROUND = 1;
+
 use Encode;
 # \x{XX} where XX is less than 255 is not treated as unicode code point
 my $subject = Encode::decode('latin1', "Sujet accentu\x{e9}");