summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps.pm')
-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;