On Thursday, April 17, 2003, at 12:29 AM, Dan Kogai wrote:
Hello.
I tried to implement cat_decode() for the HZ encoding,
and make it coping with $chk.
Thanks, applied in my repository.
I have modified t/perlio.t so it tests HZ as well. It did pass.
Dan the Encode Maintainer
===================================================================
RCS file: t/perlio.t,v
retrieving revision 1.9
diff -u -r1.9 t/perlio.t
--- t/perlio.t 2002/05/20 15:25:44 1.9
+++ t/perlio.t 2003/04/16 15:37:11
@@ -27,7 +27,7 @@
use FileHandle;
#use Test::More qw(no_plan);
-use Test::More tests => 28;
+use Test::More tests => 32;
our $DEBUG = 0;
@@ -50,8 +50,7 @@
jisx0208 => [ qw/euc-jp shiftjis 7bit-jis iso-2022-jp
iso-2022-jp-1/],
#ksc5601 => [ qw/euc-kr iso-2022-kr/],
ksc5601 => [ qw/euc-kr/],
- #gb2312 => [ qw/euc-cn hz/],
- gb2312 => [ qw/euc-cn/],
+ gb2312 => [ qw/euc-cn hz/],
);
$/ = "\x0a"; # may fix VMS problem for test #28 and #29