diff options
| -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 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; |