Upgrade to Encode 1.69.

[p5sagit/p5-mst-13.2.git] / ext / Encode / lib / Encode / Alias.pm

diff --git a/ext/Encode/lib/Encode/Alias.pm b/ext/Encode/lib/Encode/Alias.pm
index a6172ed..1cc54bf 100644 (file)
--- a/ext/Encode/lib/Encode/Alias.pm
+++ b/ext/Encode/lib/Encode/Alias.pm
@@ -128,13 +128,13 @@ sub init_aliases
     define_alias( qr/^(.*)$/ => '"\L$1"' );
 
     # UTF/UCS stuff
-    define_alias( qr/^UCS-?2-?LE$/i    => '"UCS-2LE"' );
-    define_alias( qr/^UCS-?2-?(BE)?$/i => '"UCS-2BE"',
+    define_alias( qr/^UCS-?2-?LE$/i       => '"UCS-2LE"' );
+    define_alias( qr/^UCS-?2-?(BE)?$/i    => '"UCS-2BE"',
                   qr/^UCS-?4-?(BE|LE)?$/i => 'uc("UTF-32$1")',
-                 qr/^iso-10646-1$/i   => '"UCS-2BE"' );
-    define_alias( qr/^UTF(16|32)-?BE$/i => '"UTF-$1BE"',
-                 qr/^UTF(16|32)-?LE$/i => '"UTF-$1LE"',
-                 qr/^UTF(16|32)$/i     => '"UTF-$1"',
+                 qr/^iso-10646-1$/i      => '"UCS-2BE"' );
+    define_alias( qr/^UTF(16|32)-?BE$/i   => '"UTF-$1BE"',
+                 qr/^UTF(16|32)-?LE$/i   => '"UTF-$1LE"',
+                 qr/^UTF(16|32)$/i       => '"UTF-$1"',
                );
     # ASCII
     define_alias(qr/^(?:US-?)ascii$/i => '"ascii"');