From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sun, 10 Mar 2002 00:59:50 +0000 (+0000)
Subject: The 7-bit jis seems to be the hanging one.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cb8129f94a333dfcf2cb8cf5b66784f951fc14de;p=p5sagit%2Fp5-mst-13.2.git

The 7-bit jis seems to be the hanging one.

p4raw-id: //depot/perl@15138
---

diff --git a/ext/Encode/t/Tcl.t b/ext/Encode/t/Tcl.t
index c4fd265..4f44191 100644
--- a/ext/Encode/t/Tcl.t
+++ b/ext/Encode/t/Tcl.t
@@ -93,7 +93,7 @@ my @ary_buff = (  # [ encoding, decoded, encoded ]
   ["2022-cn",     hiragana, "\e\$)A\cN". '$"$$$&$($*' . "\cO" ],
   ["2022-jp",     hiragana, "\e\$B".'$"$$$&$($*'."\e(B" ],
   ["2022-kr",     hiragana, "\e\$)C\cN". '*"*$*&*(**' . "\cO" ],
-  [ $jis,         han_kana, "\e\(I".'12345'."\e(B" ],
+#  [ $jis,         han_kana, "\e\(I".'12345'."\e(B" ],
   ["2022-jp1", macron, "\e\$(D\x2A\x27\x2A\x37\x2A\x45\x2A\x57\x2A\x69\e(B"],
   ["2022-jp2", "\x{C0}" . macron . "\x{C1}", 
        "\e\$(D\e.A\eN\x40\x2A\x27\x2A\x37\x2A\x45\x2A\x57\x2A\x69\e(B\eN\x41"],