Changeset 16182

Timestamp:

07/24/08 15:26:56 (5 years ago)

Author:

tomi-ru

Message:

regressionとして

Files:

• lang/perl/Encode-JP-Mobile/trunk/t/airh-jis.t (modified) (1 diff)

lang/perl/Encode-JP-Mobile/trunk/t/airh-jis.t

@@ -24 +24 @@
 
 is encode('x-iso-2022-jp-airh', "\x{5bc5}"), encode('iso-2022-jp', "\x{5bc5}"), "kanji(tora)";
+is encode('x-iso-2022-jp-airedge', "\x{5bc5}"), encode('iso-2022-jp', "\x{5bc5}"), "kanji(tora) x-iso-2022-jp-airedge alias";
 is decode('x-iso-2022-jp-airh', "\e\$B\x24\x57\e(B", Encode::FB_PERLQQ), "\x{3077}", "test fallback branch(only for test coverage)";
 is decode('x-iso-2022-jp-airh', "\e\$B\x24\x22\xF8\xA0\e(B"), "\x{3042}\x{E63F}", "hiragana alphabet";