Re: The last pieces of Chinese puzzle

The following patch removes the HZ support from Encode/Tcl.pm.
And please remove perl/ext/Encode/lib/Encode/Tcl/HanZi.pm, too.

P.S.
perl/ext/Encode/Encode/7bit-kr.enc is also useless.
We have 2022-kr.enc for ISO-2022-KR
and the contents of 7bit-kr.enc is wrong.

(7bit-kr.enc is identical to the original Tcl's iso2022-kr.enc,
 but Encode::Tcl::Escape can't grok this.
 Since Tcl's iso2022-kr.enc and iso2022-jp.enc have no consistency,
 iso2022-kr.enc was renamed to 7bit-kr.enc
 and the new iso2022-kr.enc (today's 2022-kr.enc) was made.)

So, please remove it.
thank you.

#patch
--- Tcl.pm~     Tue Mar 05 10:09:58 2002
+++ Tcl.pm      Tue Mar 05 23:47:50 2002
@@ -103,8 +103,7 @@
        }
        my $subclass =
            ($type eq 'X') ? 'Extended' :
-               ($type eq 'H') ? 'HanZi'    :
-                   ($type eq 'E') ? 'Escape'   : 'Table';
+               ($type eq 'E') ? 'Escape'   : 'Table';
        my $class = ref($obj) . '::' . $subclass;
        # carp "Loading $file";
        bless $obj,$class;
@@ -132,7 +131,6 @@
 require Encode::Tcl::Table;
 require Encode::Tcl::Escape;
 require Encode::Tcl::Extended;
-require Encode::Tcl::HanZi;
 
 1;
 __END__
#End of Patch

Regards,
SADAHIRO Tomoyuki