From f41cf942f543d5b5177487f50ac0ae1b324b8374 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 28 Mar 2012 20:56:47 +0000 Subject: (get_pkgs) rename 'short_name' as 'key' after last commit (clearer) --- Rpmdrake/pkg.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 2f6bfe55..ee7e78a7 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -524,8 +524,8 @@ sub get_pkgs { foreach my $pkg (@{$urpm->{depslist}}) { update_pbar($gurpm); $pkg->flag_upgrade or next; - my $short_name = $pkg->name . $pkg->arch; - $l{$short_name} = $pkg if !$l{$short_name} || $l{$short_name}->compare($pkg); + my $key = $pkg->name . $pkg->arch; + $l{$key} = $pkg if !$l{$key} || $l{$key}->compare($pkg); } my @installable_pkgs = map { my $n = $_->fullname; $all_pkgs{$n} = { pkg => $_ }; $n } values %l; undef %l; -- cgit v1.2.1