From 43dcf0fbec8f35b47176c150de65c09f03d74d8c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 14 Sep 2005 12:21:01 +0000 Subject: do have all useful info in selected leaves, including base packages, it won't be much longer but we can precise choices like lilo vs grub --- perl-install/pkgs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 33a3b2dbb..9d64b55f6 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -1362,7 +1362,7 @@ sub selected_leaves { my ($packages) = @_; my $provides = $packages->{provides}; - my @l = grep { ($_->flag_requested || $_->flag_installed) && !$_->flag_base } @{$packages->{depslist}}; + my @l = grep { $_->flag_requested || $_->flag_installed } @{$packages->{depslist}}; my %required_ids; foreach (@l) { -- cgit v1.2.1