Nyaaori/rockbox
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Properly match IDs - require a perfect match, not just a substring match. Oops.

Browse source 
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@21436 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Jonas Häggqvist 2009-06-21 00:03:41 +00:00
parent 1a98e973fb
commit 74bcdcc023
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
tools/langtool.pl
View file

@ -176,7 +176,7 @@ foreach my $file (@ARGV) {
}
if ($deprecate) {
if ($id ne "" and grep(/$id/, @ids)) {
if ($id ne "" and grep(/^$id$/, @ids)) {
# Set desc
$line =~ s/\s*desc:.*/ desc: deprecated/;
# Set user
@ -193,19 +193,19 @@ foreach my $file (@ARGV) {
}
elsif ($changetarget) {
# Change target if set and it's the same as $from
if ($id ne "" and grep(/$id/, @ids) and $location =~ /source|dest|voice/ and $target eq $from) {
if ($id ne "" and grep(/^$id$/, @ids) and $location =~ /source|dest|voice/ and $target eq $from) {
$line =~ s/\Q$from/$to/;
}
}
elsif ($changesource) {
# Change string if $target is set and matches $s_target
if ($id ne "" and grep(/$id/, @ids) and $target eq $s_target and $location eq "source") {
if ($id ne "" and grep(/^$id$/, @ids) and $target eq $s_target and $location eq "source") {
$line =~ s/\Q$string/$to/;
}
}
elsif ($changedesc) {
# Simply change the desc line if the id matches
if ($id ne "" and grep(/$id/, @ids)) {
if ($id ne "" and grep(/^$id$/, @ids)) {
$line =~ s/\s*desc:.*/ desc: $to/;
}
}