Revert "Revert "let's be consistently case-insensitive with respect to the xml tags""

This reverts commit 8b6e98c633.
This commit is contained in:
amittai 2013-02-26 11:32:29 -08:00
parent 225feafb9e
commit 5cdf65ba33

View File

@ -13,10 +13,10 @@ chomp(@OUT);
while(<SRC>) { while(<SRC>) {
chomp; chomp;
if (/^<srcset/) { if (/^<srcset/) {
s/<srcset/<tstset trglang="$language"/; s/<srcset/<tstset trglang="$language"/i;
} }
elsif (/^<\/srcset/) { elsif (/^<\/srcset/) {
s/<\/srcset/<\/tstset/; s/<\/srcset/<\/tstset/i;
} }
elsif (/^<doc/i) { elsif (/^<doc/i) {
s/ *sysid="[^\"]+"//; s/ *sysid="[^\"]+"//;
@ -26,10 +26,10 @@ while(<SRC>) {
my $line = shift(@OUT); my $line = shift(@OUT);
$line = "" if $line =~ /NO BEST TRANSLATION/; $line = "" if $line =~ /NO BEST TRANSLATION/;
if (/<\/seg>/) { if (/<\/seg>/) {
s/(<seg[^>]+> *).*(<\/seg>)/$1$line$2/; s/(<seg[^>]+> *).*(<\/seg>)/$1$line$2/i;
} }
else { else {
s/(<seg[^>]+> *)[^<]*/$1$line/; s/(<seg[^>]+> *)[^<]*/$1$line/i;
} }
} }
print $_."\n"; print $_."\n";