From: Steve Hay <SteveHay@planit.com>
Date: Fri, 14 May 2004 17:33:17 +0000 (+0100)
Subject: Re: Smoke [5.9.2] 22818 FAIL(F) MSWin32 WinXP/.Net SP1 (x86/1 cpu)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ed45ef62d36fda3bd7a28c1f40ea59384afa46bd;p=p5sagit%2Fp5-mst-13.2.git

Re: Smoke [5.9.2] 22818 FAIL(F) MSWin32 WinXP/.Net SP1 (x86/1 cpu)
Message-ID: <40A4F4CD.2000003@uk.radan.com>

p4raw-id: //depot/perl@22827
---

diff --git a/t/comp/utf.t b/t/comp/utf.t
index a7b8566..d2037a2 100644
--- a/t/comp/utf.t
+++ b/t/comp/utf.t
@@ -17,7 +17,7 @@ my $BOM = chr(0xFEFF);
 
 sub test {
     my ($enc, $tag, $bom) = @_;
-    open(UTF_PL, ">:encoding($enc)", "utf.pl")
+    open(UTF_PL, ">:raw:encoding($enc)", "utf.pl")
 	or die "utf.pl($enc,$tag,$bom): $!";
     print UTF_PL $BOM if $bom;
     print UTF_PL "$tag\n";