aboutsummaryrefslogtreecommitdiffstats
path: root/URPM
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-09-17 18:03:07 +0000
committerThierry Vignaud <tv@mageia.org>2012-09-17 18:03:07 +0000
commitb490c4441ec9b1078b1851d490f3cf5b87f29ee3 (patch)
tree017febf8177540df2e24e1895d42d4f5bebd6d5b /URPM
parent9798710de11d8451f613d753cf0051967c753fac (diff)
downloadperl-URPM-b490c4441ec9b1078b1851d490f3cf5b87f29ee3.tar
perl-URPM-b490c4441ec9b1078b1851d490f3cf5b87f29ee3.tar.gz
perl-URPM-b490c4441ec9b1078b1851d490f3cf5b87f29ee3.tar.bz2
perl-URPM-b490c4441ec9b1078b1851d490f3cf5b87f29ee3.tar.xz
perl-URPM-b490c4441ec9b1078b1851d490f3cf5b87f29ee3.zip
(resolve_requested_suggests) micro-optimization
Diffstat (limited to 'URPM')
-rw-r--r--URPM/Resolve.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index b6ceac6..7b38e2e 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -895,7 +895,7 @@ sub resolve_requested_suggests {
my %suggests = map { $_ => 1 } $pkg->suggests or next;
#- do not install a package that has already been suggested
- $db->traverse_tag('name', [ $pkg->name ], sub {
+ $db->traverse_tag_find('name', $pkg->name, sub {
my ($p) = @_;
delete $suggests{$_} foreach $p->suggests;
});