Change 14514 by jhi@alpha on 2002/02/01 14:45:26
Subject: [PATCH utf8.t] temp file not cleaned up
From: Rafael Garcia-Suarez <[EMAIL PROTECTED]>
Date: Fri, 1 Feb 2002 15:47:46 +0100
Message-ID: <20020201154746.A24079@rafael>
Affected files ...
.... //depot/perl/t/io/utf8.t#23 edit
Differences ...
==== //depot/perl/t/io/utf8.t#23 (xtext) ====
Index: perl/t/io/utf8.t
--- perl/t/io/utf8.t.~1~ Fri Feb 1 08:00:05 2002
+++ perl/t/io/utf8.t Fri Feb 1 08:00:05 2002
@@ -229,7 +229,7 @@
print $@ =~ /Wide character in print/ ? "ok 27\n" : "not ok 27\n";
undef $@;
- open F, ">:utf8", ">a";
+ open F, ">:utf8", "a";
print F chr(0x100);
close(F);
End of Patch.