diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-13 23:27:43 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-13 23:27:43 +0000 |
commit | 3f3ced984833bf1084447c1afd3cfc7d17d0838b (patch) | |
tree | d1c9b1884efe353b3fa5a165ca7f601dfa8c6ff5 /perl-install/install_steps.pm | |
parent | 21afb921cd71327cae09ec568f11e6f020a93229 (diff) | |
download | drakx-backup-do-not-use-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar drakx-backup-do-not-use-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar.gz drakx-backup-do-not-use-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar.bz2 drakx-backup-do-not-use-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar.xz drakx-backup-do-not-use-3f3ced984833bf1084447c1afd3cfc7d17d0838b.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r-- | perl-install/install_steps.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 5cf74d227..cb81ad4ff 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -105,10 +105,11 @@ sub selectPath {} #------------------------------------------------------------------------------ sub selectInstallClass($@) { my ($o) = @_; - $o->{installClass} ||= "normal"; + $o->{installClass} ||= $::corporate ? "corporate" : "normal"; $o->{security} ||= ${{ normal => 2, developer => 3, + corporate => 3, server => 4, }}{$o->{installClass}}; } @@ -786,7 +787,7 @@ sub miscellaneous { $o->{security} ||= $s{SECURITY} if exists $s{SECURITY}; $ENV{SECURE_LEVEL} = $o->{security}; - add2hash_ $o, { useSupermount => $o->{security} < 4 }; + add2hash_ $o, { useSupermount => $o->{security} < 4 && $o->{installClass} !~ /corporate|server/ }; cat_("/proc/cmdline") =~ /mem=(\S+)/; add2hash_($o->{miscellaneous} ||= {}, { numlock => !$o->{pcmcia}, $1 ? (memsize => $1) : () }); |