perl-unicode

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

2002-04-04 19:33:45
On Friday, April 5, 2002, at 11:20 , Anton Tagunov wrote:
Hello, Dan!

A two-pence question (very quick and probably foolish :-)

What is the marked alias about?

    define_alias( qr/^UCS-2LE$/i    => '"UTF-16LE"',
                  qr/^UCS2-le$/i    => '"UCS-2"', );
                  ^^^^^^^^^^^^^^^^

    define_alias( qr/^UTF-16BE$/i    => '"UCS-2"',

All I could understand meant that UCS-2 is BigEndian.
Why is UCS2-le aliased to it then?

Yikes. I thought it was deleted. jhi, Please get rid of them. Now that all aliases are case insensitive as first documented, the alias Anton has noted is completely pointless.

Dan the Encode Maintainer

--- lib/Encode/Alias.pm 2002/04/04 19:50:52     1.20
+++ lib/Encode/Alias.pm 2002/04/05 02:32:55
@@ -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/^UCS-2LE$/i    => '"UTF-16LE"');
     # Moved from Encode::10464_1
     define_alias( qr/^UTF-16BE$/i    => '"UCS-2"',
                  qr/^UCS2$/i        => '"UCS-2"',