perl-unicode

A FIX. [Re: qr/^UCS2-le$/i => '"UCS-2"' -- what is it?]

2002-04-04 19:40:19
On Friday, April 5, 2002, at 11:33 , Dan Kogai wrote:
-                 qr/^UCS2-le$/i    => '"UCS-2"', );
+                 qr/^UCS-2LE$/i    => '"UTF-16LE"');
                        ^^^^^^^aaaggh!

Forget the last one.  This one is correct.

Dan-the-Encode-Maintainer

diff -du -r1.20 lib/Encode/Alias.pm
--- lib/Encode/Alias.pm 2002/04/04 19:50:52     1.20
+++ lib/Encode/Alias.pm 2002/04/05 02:36:41
@@ -131,7 +131,7 @@
     define_alias( qr/^UTF-8$/i => '"utf8"',);
     # Moved from Encode::ucs2_le
     define_alias( qr/^UCS-2LE$/i    => '"UTF-16LE"',
-                 qr/^UCS2-le$/i    => '"UCS-2"', );
+                 qr/^UCS2-LE$/i    => '"UTF-16LE"');
     # Moved from Encode::10464_1
     define_alias( qr/^UTF-16BE$/i    => '"UCS-2"',
                  qr/^UCS2$/i        => '"UCS-2"',
dankogai(_at_)dan-attic[1918]:~/work/Encode>