--- branches/hidra/filter/croascii.pm 2004/04/18 02:15:16 322 +++ branches/hidra/filter/croascii.pm 2004/04/18 02:19:42 323 @@ -5,7 +5,7 @@ my $out = ""; foreach (@_) { # tr/^~]}\|[{@`/ÈèÆæÐ𩹮¾/; # B1.002:1982 - tr/^~]}\\|[{@`/ÈèÆæðЩ¹®¾/; # Crolist croascii + tr/^~]}\\|[{@`/ÈèÆæÐ𩹮¾/; # Crolist croascii # Crolist alternative encoding s/ÏC/È/g; s/Ïc/è/g;