diff options
Diffstat (limited to 'pm')
| -rw-r--r-- | pm/MGATools/rpmsrate.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm index e899fb8..4a41ce0 100644 --- a/pm/MGATools/rpmsrate.pm +++ b/pm/MGATools/rpmsrate.pm @@ -46,6 +46,7 @@ sub cleanrpmsrate { $norpmsrate ||= []; my $LOG; open $LOG, ">&STDERR"; my (@rpmsrate, %potloc); + # must preread to get locale guessed packages # postfix is just used not to break the diff when checking if the result is correct foreach (cat_or_die($rpmsrate)) { @@ -71,6 +72,7 @@ sub cleanrpmsrate { $potloc{$_} = [] foreach @{$data[0]}; push @rpmsrate, [ $indent,$r, $flags, $data[1], $postfix ]; } + my (%rpms, $text); my (%rate, %section, %keyword); my (%locale, %localized_pkg); |