summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-13 23:27:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-13 23:27:43 +0000
commit3f3ced984833bf1084447c1afd3cfc7d17d0838b (patch)
treed1c9b1884efe353b3fa5a165ca7f601dfa8c6ff5 /perl-install/install_steps.pm
parent21afb921cd71327cae09ec568f11e6f020a93229 (diff)
downloaddrakx-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar
drakx-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar.gz
drakx-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar.bz2
drakx-3f3ced984833bf1084447c1afd3cfc7d17d0838b.tar.xz
drakx-3f3ced984833bf1084447c1afd3cfc7d17d0838b.zip
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm5
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) : () });