summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-01-22 11:26:48 +0000
committerFrancois Pons <fpons@mandriva.com>2003-01-22 11:26:48 +0000
commitfae3701aa886ae882c3fecdeb7b88879d67e97b6 (patch)
tree76d893c239eb2663583e386b181307f43c3dae0b /perl-install/install_steps_interactive.pm
parent2f72f5fa0663cd50db88cf8e91450e924355c62d (diff)
downloaddrakx-fae3701aa886ae882c3fecdeb7b88879d67e97b6.tar
drakx-fae3701aa886ae882c3fecdeb7b88879d67e97b6.tar.gz
drakx-fae3701aa886ae882c3fecdeb7b88879d67e97b6.tar.bz2
drakx-fae3701aa886ae882c3fecdeb7b88879d67e97b6.tar.xz
drakx-fae3701aa886ae882c3fecdeb7b88879d67e97b6.zip
perl checker fixes.
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 00fc43133..44c189b2f 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -385,7 +385,7 @@ sub choosePackages {
log::l("max size (level $min_mark) is : " . formatXiB($max_size));
pkgs::restoreSelected($b);
- $o->chooseGroups($packages, $compssUsers, $min_mark, \$individual, $max_size) unless $o->{isUpgrade} || $::corporate;
+ $o->chooseGroups($packages, $compssUsers, $min_mark, \$individual, $max_size) if !$o->{isUpgrade} && !$::corporate;
($o->{packages_}{ind}) =
pkgs::setSelectedFromCompssList($packages, $o->{compssUsersChoice}, $min_mark, $availableC);