From 65b3487282e04759e8339875963b4403b690cc2c Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 6 Jan 2009 16:55:46 +0000 Subject: warn traverse() is costly --- Rpmdrake/pkg.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'Rpmdrake/pkg.pm') diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index be2ed7fb..de890e26 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -325,6 +325,7 @@ sub get_installed_packages { $base{$_} = \$n; } } + # costly: $db->traverse(sub { my ($pkg) = @_; update_pbar($gurpm); -- cgit v1.2.1