perl-unicode

[PATCH] oops.

2002-09-30 19:30:07
Encode::TW is correct, Encode::Alias not.

/Autrijus/

--- /usr/local/lib/perl5/5.8.0/i386-freebsd/Encode/Alias.pm     Thu Jun  6 
22:31:31 2002
+++ lib/Encode/Alias.pm Tue Oct  1 09:55:24 2002
@@ -219,7 +219,7 @@
         define_alias( qr/\bks_c_5601-1987$/i      => '"cp949"' );
         # for Encode::TW
        define_alias( qr/\bbig-?5$/i              => '"big5-eten"' );
-       define_alias( qr/\bbig5-?et(?:en)$/i      => '"big5-eten"' );
+       define_alias( qr/\bbig5-?et(?:en)?$/i     => '"big5-eten"' );
        define_alias( qr/\btca[-_]?big5$/i        => '"big5-eten"' );
        define_alias( qr/\bbig5-?hk(?:scs)?$/i    => '"big5-hkscs"' );
        define_alias( qr/\bhk(?:scs)?[-_]?big5$/i  => '"big5-hkscs"' );

Attachment: pgp6bLC7MmKVE.pgp
Description: PGP signature

<Prev in Thread] Current Thread [Next in Thread>