--- trunk2/all2all.pl 2004/10/26 18:59:38 546 +++ trunk2/all2all.pl 2004/10/26 20:53:03 549 @@ -63,6 +63,10 @@ $string =~ tr/ðÐ/dD/; $string = $pr . $string; } + $string =~ s/&(\w)(acute|cedil|circ|grave|ring|slash|tilde|uml);/$1/gi; + $string =~ s/ð/d/g; + $string =~ s/&E[tT][hH];/D/g; + $string =~ s/&(\w\w)lig;/$1/gi; return lc($string); }