summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-15 12:17:39 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-15 12:17:39 +0000
commit5a5c10bca19f792c127dfb77e7335dac9dd5bb4e (patch)
tree5e138fd1681edf98b53bc46d2dcf263604cdeb5f
parenta287db3ee9a6a41975242601af6a76fd601bc5e2 (diff)
downloadmgatools-5a5c10bca19f792c127dfb77e7335dac9dd5bb4e.tar
mgatools-5a5c10bca19f792c127dfb77e7335dac9dd5bb4e.tar.gz
mgatools-5a5c10bca19f792c127dfb77e7335dac9dd5bb4e.tar.bz2
mgatools-5a5c10bca19f792c127dfb77e7335dac9dd5bb4e.tar.xz
mgatools-5a5c10bca19f792c127dfb77e7335dac9dd5bb4e.zip
(cleanrpmsrate) rename a variable for better reading
-rw-r--r--pm/MGATools/rpmsrate.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm
index 41c96a7..a027886 100644
--- a/pm/MGATools/rpmsrate.pm
+++ b/pm/MGATools/rpmsrate.pm
@@ -108,7 +108,7 @@ sub cleanrpmsrate {
my ($rpmsrate_file, $output, $norpmsrate, $reprpms, $o_urpm) = @_;
$norpmsrate ||= [];
- my ($rsrate_ref, $potloc) = preread_rpmsrate($rpmsrate_file, $norpmsrate);
+ my ($rpmsrate, $potloc) = preread_rpmsrate($rpmsrate_file, $norpmsrate);
my (%rpms, $text, %rate, %section, %keyword, %locale, %localized_pkg);
my @plain_flags = qw(INSTALL LIVE);
@@ -145,7 +145,7 @@ sub cleanrpmsrate {
}
my (%done, @flags, @tree_rate, $prev_level);
- foreach (@$rsrate_ref) {
+ foreach (@$rpmsrate) {
if (!$_->[0]) {
$text .= "$_->[2]$_->[4]\n";
@flags = $_->[2] if $_->[2];