summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-15 12:17:36 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-15 12:17:36 +0000
commita287db3ee9a6a41975242601af6a76fd601bc5e2 (patch)
tree115636790e9ac3ebe67639cc3769d2b6f9c0a3a3
parent4cc88690c9c2385573b9a2bd1ac85fe3f174fca3 (diff)
downloadmgatools-a287db3ee9a6a41975242601af6a76fd601bc5e2.tar
mgatools-a287db3ee9a6a41975242601af6a76fd601bc5e2.tar.gz
mgatools-a287db3ee9a6a41975242601af6a76fd601bc5e2.tar.bz2
mgatools-a287db3ee9a6a41975242601af6a76fd601bc5e2.tar.xz
mgatools-a287db3ee9a6a41975242601af6a76fd601bc5e2.zip
(cleanrpmsrate) rename a variable for better reading
-rw-r--r--pm/MGATools/rpmsrate.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm
index 16402e8..41c96a7 100644
--- a/pm/MGATools/rpmsrate.pm
+++ b/pm/MGATools/rpmsrate.pm
@@ -105,10 +105,10 @@ sub check_if_expandable {
# function copied from Mkcd::Tools
sub cleanrpmsrate {
- my ($rpmsrate, $output, $norpmsrate, $reprpms, $o_urpm) = @_;
+ my ($rpmsrate_file, $output, $norpmsrate, $reprpms, $o_urpm) = @_;
$norpmsrate ||= [];
- my ($rsrate_ref, $potloc) = preread_rpmsrate($rpmsrate, $norpmsrate);
+ my ($rsrate_ref, $potloc) = preread_rpmsrate($rpmsrate_file, $norpmsrate);
my (%rpms, $text, %rate, %section, %keyword, %locale, %localized_pkg);
my @plain_flags = qw(INSTALL LIVE);
@@ -249,11 +249,11 @@ sub cleanrpmsrate {
if (%rpms || $output || %locale) {
if (%$reprpms || $output) {
- $output ||= $rpmsrate;
+ $output ||= $rpmsrate_file;
if (open my $A, ">$output") {
print $A $text;
} else {
- warn "ERROR cleanrpmsrate: cannot open $rpmsrate for writing\n";
+ warn "ERROR cleanrpmsrate: cannot open $rpmsrate_file for writing\n";
print $text;
}
}