diff options
author | Francois Pons <fpons@mandriva.com> | 1999-10-13 15:37:20 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 1999-10-13 15:37:20 +0000 |
commit | 7afaa567f5059510ecdea266b67679810a81bf0b (patch) | |
tree | 10428a316107ecabbe1a1d2e088615fe2c6d6828 /perl-install/install_steps.pm | |
parent | ebe64ad2cfa3612cc535f8a9f192090a8555b738 (diff) | |
download | drakx-backup-do-not-use-7afaa567f5059510ecdea266b67679810a81bf0b.tar drakx-backup-do-not-use-7afaa567f5059510ecdea266b67679810a81bf0b.tar.gz drakx-backup-do-not-use-7afaa567f5059510ecdea266b67679810a81bf0b.tar.bz2 drakx-backup-do-not-use-7afaa567f5059510ecdea266b67679810a81bf0b.tar.xz drakx-backup-do-not-use-7afaa567f5059510ecdea266b67679810a81bf0b.zip |
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r-- | perl-install/install_steps.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 8188fa87f..6794899f7 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -181,8 +181,11 @@ sub beforeInstallPackages { sub installPackages($$) { my ($o, $packages) = @_; - my $toInstall = [ grep { $_->{selected} && !$_->{installed} } values %$packages ]; - pkgs::install($o->{prefix}, $toInstall); + #- my $toInstall = [ grep { $_->{selected} && !$_->{installed} } values %$packages ]; + my @toInstall = $packages->{basesystem}{selected} && !$packages->{basesystem}{installed} ? ($packages->{basesystem}) : (); + push @toInstall, grep { $_->{base} && $_->{selected} && !$_->{installed} } values %$packages; + push @toInstall, grep { !$_->{base} && $_->{selected} && !$_->{installed} } values %$packages; + pkgs::install($o->{prefix}, \@toInstall); } sub afterInstallPackages($) { |