--- branches/fsb/filter/croascii.pm	2004/04/18 00:57:39	320
+++ branches/fsb/filter/croascii.pm	2004/04/18 01:03:27	321
@@ -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;