diff options
-rw-r--r-- | perl-install/install_any.pm | 6 | ||||
-rw-r--r-- | perl-install/install_steps.pm | 1 |
2 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index c813672b8..ff0a674a5 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -107,8 +107,10 @@ sub setPackages { $o->{compssList} = pkgs::readCompssList($o->{packages}); push @{$o->{base}}, "kernel-smp" if smp::detect(); - $o->{packages}{$_}{base} = - $o->{packages}{$_}{selected} = 1 foreach @{$o->{base}}; + do { + my $p = $o->{packages}{$_} or log::l(), next; + pkgs::select($o->{packages}, $p, 1); + } foreach @{$o->{base}}; pkgs::setShowFromCompss($o->{compss}, $o->{installClass}, $o->{lang}); diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index ebae0afec..5d51e4ead 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -12,6 +12,7 @@ use run_program; use lilo; use lang; use keyboard; +use printer; use pkgs; use log; use fsedit; |