diff options
Diffstat (limited to 'pm')
| -rw-r--r-- | pm/MGATools/rpmsrate.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm index 384b078..4e7a0e6 100644 --- a/pm/MGATools/rpmsrate.pm +++ b/pm/MGATools/rpmsrate.pm @@ -201,7 +201,7 @@ sub cleanrpmsrate { !/^[^ ]+ (.*)/ || $1 ne $f; } @{$done{$_}}; - my ($d) = /(.*)-[^-]+/; + my ($name) = /(.*)-[^-]+/; my ($e, $do); if (!$is_plain_flag) { @@ -228,11 +228,11 @@ sub cleanrpmsrate { } # process localized packages (eg: man-pages-XX, hunspell-XX, firefox-XX, ...) - if ($locale{$d} && $localized_pkg{$c}) { - foreach (sort @{$locale{$d}}) { - next if member($flat_path, @{$done{"$d-$_"}}); - push @{$done{"$d-$_"}}, $flat_path; - push @k , "$d-$_"; + if ($locale{$name} && $localized_pkg{$c}) { + foreach (sort @{$locale{$name}}) { + next if member($flat_path, @{$done{"$name-$_"}}); + push @{$done{"$name-$_"}}, $flat_path; + push @k , "$name-$_"; } next; } |