summaryrefslogtreecommitdiffstats
path: root/pm
diff options
context:
space:
mode:
Diffstat (limited to 'pm')
-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 f74b17a..06ed2a2 100644
--- a/pm/MGATools/rpmsrate.pm
+++ b/pm/MGATools/rpmsrate.pm
@@ -75,7 +75,7 @@ sub preread_rpmsrate {
# function copied from Mkcd::Tools
sub cleanrpmsrate {
- my ($rpmsrate, $output, $norpmsrate, $reprpms, $urpm) = @_;
+ my ($rpmsrate, $output, $norpmsrate, $reprpms, $o_urpm) = @_;
$norpmsrate ||= [];
open(my $LOG, ">&STDERR");
@@ -114,7 +114,7 @@ sub cleanrpmsrate {
} elsif (my ($pg, $loc) = /^(.*)-([^-+]+)$/) {
if ($potloc{$pg}) {
my $pkg;
- $pkg = $urpm->{rpm}{$urpm->{rpmkey}{key}{$key}} if ref $urpm;
+ $pkg = $o_urpm->{rpm}{$o_urpm->{rpmkey}{key}{$key}} if ref($o_urpm);
# if package is not urpmi' synthesis, try to parse it directly:
if (!$pkg) {