diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-06-27 19:06:49 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-06-27 19:09:00 +0200 |
commit | 51d0db0a69439eb0ee030e94aa75f359183d992e (patch) | |
tree | 67a37dafb4904bd7e1af0eac0f424f1f1550dda7 | |
parent | d082f871e95f3977dd3198090ed21e44a2a2ae0e (diff) | |
download | rpmdrake-51d0db0a69439eb0ee030e94aa75f359183d992e.tar rpmdrake-51d0db0a69439eb0ee030e94aa75f359183d992e.tar.gz rpmdrake-51d0db0a69439eb0ee030e94aa75f359183d992e.tar.bz2 rpmdrake-51d0db0a69439eb0ee030e94aa75f359183d992e.tar.xz rpmdrake-51d0db0a69439eb0ee030e94aa75f359183d992e.zip |
fix comparing packages
compare_pkg() is the right method to invoke,
compare() implies stringifying a URPM::Package which is not what we want
regarding version comparison
-rw-r--r-- | Rpmdrake/pkg.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 3d80d269..907def78 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -524,7 +524,7 @@ sub get_pkgs { update_pbar($gurpm); $pkg->flag_upgrade or next; my $key = pkg2medium($pkg, $urpm) . $pkg->name . $pkg->arch; - $l{$key} = $pkg if !$l{$key} || $l{$key}->compare($pkg); + $l{$key} = $pkg if !$l{$key} || $l{$key}->compare_pkg($pkg); } my @installable_pkgs = map { my $n = $_->fullname; $all_pkgs{$n} = { pkg => $_ }; $n } values %l; undef %l; |