diff options
author | matteo <matteo.pasotti@gmail.com> | 2014-06-28 12:03:09 +0300 |
---|---|---|
committer | matteo <matteo.pasotti@gmail.com> | 2014-06-28 12:03:09 +0300 |
commit | 7d37b66a480ab62f66433c120acefe088889efd8 (patch) | |
tree | 5756ad2234de9c7dfddcc6b0674f14aefa6195a3 | |
parent | 8bc3c0da8473d490c0eeb8e8e59dadc0c4fe5c92 (diff) | |
download | manatools-7d37b66a480ab62f66433c120acefe088889efd8.tar manatools-7d37b66a480ab62f66433c120acefe088889efd8.tar.gz manatools-7d37b66a480ab62f66433c120acefe088889efd8.tar.bz2 manatools-7d37b66a480ab62f66433c120acefe088889efd8.tar.xz manatools-7d37b66a480ab62f66433c120acefe088889efd8.zip |
using compare_pkg instead of compare
-rw-r--r-- | lib/AdminPanel/Rpmdragora/pkg.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/AdminPanel/Rpmdragora/pkg.pm b/lib/AdminPanel/Rpmdragora/pkg.pm index e8c1a08a..4b8a59a9 100644 --- a/lib/AdminPanel/Rpmdragora/pkg.pm +++ b/lib/AdminPanel/Rpmdragora/pkg.pm @@ -530,7 +530,7 @@ sub get_pkgs { update_pbar($gurpm); $pkg->flag_upgrade or next; my $key = $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; |