From 25946f2b1829f207aab844f3464ce515a50f15cc Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 25 Apr 2000 16:12:35 +0000 Subject: *** empty log message *** --- perl-install/pkgs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/pkgs.pm') diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 5357c92e5..eb6b88050 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -202,7 +202,7 @@ sub packagesOfMedium { } sub packagesToInstall { my ($packages) = @_; - grep { pkgs::packageFlagSelected($_) && !pkgs::packageFlagInstalled($_) } values %{$packages->[0]}; + grep { $_->{medium}{selected} && packageFlagSelected($_) && !packageFlagInstalled($_) } values %{$packages->[0]}; } sub allMediums { -- cgit v1.2.1