summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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;
}
}