summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-01-18 13:35:53 +0000
committerFrancois Pons <fpons@mandriva.com>2001-01-18 13:35:53 +0000
commitd5398d16525faf667da6bafb153cfff0f6189428 (patch)
tree99b3e3a1d6386198e307e5448fd03f75aec66c52 /perl-install
parent366124d759281ea7c6c4abf4bf35789fff557c7a (diff)
downloaddrakx-d5398d16525faf667da6bafb153cfff0f6189428.tar
drakx-d5398d16525faf667da6bafb153cfff0f6189428.tar.gz
drakx-d5398d16525faf667da6bafb153cfff0f6189428.tar.bz2
drakx-d5398d16525faf667da6bafb153cfff0f6189428.tar.xz
drakx-d5398d16525faf667da6bafb153cfff0f6189428.zip
fixed obligation of relative large install, now minimum is lesser.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps.pm7
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 685379a7d..74955e357 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -268,8 +268,11 @@ sub choosePackages {
pkgs::unselectAllPackages($packages);
pkgs::selectPackage($o->{packages}, pkgs::packageByName($o->{packages}, $_) || next) foreach @{$o->{default_packages}};
- add2hash_($o, { compssListLevel => $::expert ? 5 : 4 }) unless $::auto_install;
- pkgs::setSelectedFromCompssList($packages, $o->{compssUsersChoice}, $o->{compssListLevel}, $availableCorrected) if exists $o->{compssListLevel};
+ unless ($::expert) {
+ add2hash_($o, { compssListLevel => 5 }) unless $::auto_install;
+ exists $o->{compssListLevel}
+ and pkgs::setSelectedFromCompssList($packages, $o->{compssUsersChoice}, $o->{compssListLevel}, $availableCorrected);
+ }
}
$availableCorrected;