Change 15013 by jhi@alpha on 2002/03/04 18:36:05

        SJIS, from Dan Kogai.

Affected files ...

.... //depot/perl/ext/Encode/JP/JP.pm#3 edit
.... //depot/perl/ext/Encode/JP/Makefile.PL#3 edit

Differences ...

==== //depot/perl/ext/Encode/JP/JP.pm#3 (text) ====
Index: perl/ext/Encode/JP/JP.pm
--- perl/ext/Encode/JP/JP.pm.~1~        Mon Mar  4 11:45:06 2002
+++ perl/ext/Encode/JP/JP.pm    Mon Mar  4 11:45:06 2002
@@ -14,3 +14,45 @@
 
 1;
 __END__
+=head1 NAME
+
+Encode::JP - Japanese Encodings
+
+=head1 SYNOPSIS
+
+    use Encode::JP;
+    $euc_jp = encode("euc-jp", $utf8);
+    $utf8   = encode("euc-jp", $euc_jp);
+
+=head1 ABSTRACT
+
+This module implements Japanese charset encodings.  Encodings
+supported are as follows.
+
+  euc-jp        EUC (Extended Unix Character)
+  shiftjis      Shift JIS (aka MS Kanji)
+  7bit-jis      7bit JIS
+  iso-2022-jp   ISO-2022-JP (7bit JIS with all X201 converted to X208)
+  macjapan      Mac Japan (Shift JIS + Apple vendor mappings)
+  cp932         Code Page 932 (Shift JIS + Microsoft vendor mappings)
+
+=head1 DESCRIPTION
+
+To find how to use this module in detail, see L<Encode>.
+
+=head1 BUGS
+
+JIS X0212-1990 is not supported.
+
+ASCII part (0x00-0x7f) is preserved for all encodings, even though it
+conflicts with mappings by the Unicode Consortium.  See
+
+F<http://www.debian.or.jp/~kubota/unicode-symbols.html.en>
+
+to find why it is implemented that way.
+
+=head1 SEE ALSO
+
+L<Encode>
+
+=cut

==== //depot/perl/ext/Encode/JP/Makefile.PL#3 (text) ====
Index: perl/ext/Encode/JP/Makefile.PL
--- perl/ext/Encode/JP/Makefile.PL.~1~  Mon Mar  4 11:45:06 2002
+++ perl/ext/Encode/JP/Makefile.PL      Mon Mar  4 11:45:06 2002
@@ -3,6 +3,7 @@
 use ExtUtils::MakeMaker;
 
 my %tables = (EUC_JP   => ['euc-jp.enc'],
+              SHIFTJIS => ['shiftjis.enc'],
              MACJAPAN => ['macJapan.enc'],
              CP932    => ['cp932.enc'],
              );
End of Patch.

Reply via email to