From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Thu, 21 Dec 2000 21:54:04 +0000 (+0000)
Subject: CRLF platform issue with io/utf8 fix.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=79086a00fceeae7aba98dc19e4dcdc07692dddbf;p=p5sagit%2Fp5-mst-13.2.git

CRLF platform issue with io/utf8 fix.

p4raw-id: //depot/perlio@8225
---

diff --git a/t/io/utf8.t b/t/io/utf8.t
index ea19a05..04554e7 100755
--- a/t/io/utf8.t
+++ b/t/io/utf8.t
@@ -76,7 +76,7 @@ print "ok 15\n";
 close F;
 
 open F, ">:utf8", 'a' or die $!;
-
+binmode(F);  # we write a "\n" and then tell() - avoid CRLF issues.
 print F $a;
 my $y;
 { my $x = tell(F);