Change 18495 by jhi@lyta on 2003/01/16 20:19:36
It seems the binmode() is needed with UTF-8 locales enabled.
Affected files ...
... //depot/perl/ext/Encode/t/CJKT.t#9 edit
Differences ...
==== //depot/perl/ext/Encode/t/CJKT.t#9 (text) ====
Index: perl/ext/Encode/t/CJKT.t
--- perl/ext/Encode/t/CJKT.t#8~18057~ Thu Oct 24 16:16:15 2002
+++ perl/ext/Encode/t/CJKT.t Thu Jan 16 12:19:36 2003
@@ -57,7 +57,7 @@
open $src, "<$src_enc" or die "$src_enc : $!";
- # binmode($src); # not needed!
+ binmode($src); # needed if UTF-8 locales enabled!
$txt = join('',<$src>);
close($src);
End of Patch.
