diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install2.pm | 11 | ||||
| -rw-r--r-- | perl-install/install_steps.pm | 28 |
2 files changed, 21 insertions, 18 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 9820aa8bb..392a502f3 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -228,16 +228,7 @@ sub miscellaneous { installStepsCall($o, $auto, 'miscellaneousBefore', $clicked); installStepsCall($o, $auto, 'miscellaneous', $clicked); - - addToBeDone { - setVarsInSh("$o->{prefix}/etc/sysconfig/system", { - CLASS => $::expert && 'expert' || 'beginner', - SECURITY => $o->{security}, - META_CLASS => $o->{meta_class} || 'PowerPack', - }); - substInFile { s/KEYBOARD_AT_BOOT=.*/KEYBOARD_AT_BOOT=yes/ } "$o->{prefix}/etc/sysconfig/usb" if detect_devices::usbKeyboards(); - - } 'installPackages'; + installStepsCall($o, $auto, 'miscellaneousAfter', $clicked); } #------------------------------------------------------------------------------ diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index c83cb751c..9bf1830f9 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -928,21 +928,33 @@ sub miscellaneousBefore { $o->{miscellaneous}{HDPARM} ||= $s{HDPARM} if exists $s{HDPARM}; $o->{security} ||= $s{SECURITY} if exists $s{SECURITY}; + add2hash_($o->{miscellaneous} ||= {}, { numlock => !detect_devices::isLaptop() }); +} +sub miscellaneous { + my ($o) = @_; + #- keep some given parameters + #-TODO +} +sub miscellaneousAfter { + my ($o) = @_; + add2hash_ $o, { useSupermount => 1 && $o->{security} < 4 && arch() !~ /sparc/ && !$::corporate }; + $ENV{SECURE_LEVEL} = $o->{security}; addToBeDone { mkdir_p("$o->{prefix}/etc/security/msec"); symlink "server.$o->{security}", "$o->{prefix}/etc/security/msec/server" if $o->{security} > 3; } 'formatPartitions'; - - add2hash_ $o, { useSupermount => 1 && $o->{security} < 4 && arch() !~ /sparc/ && !$::corporate }; - add2hash_($o->{miscellaneous} ||= {}, { numlock => !detect_devices::isLaptop() }); -} -sub miscellaneous { - my ($o) = @_; - #- keep some given parameters - #-TODO + addToBeDone { + setVarsInSh("$o->{prefix}/etc/sysconfig/system", { + CLASS => $::expert && 'expert' || 'beginner', + SECURITY => $o->{security}, + META_CLASS => $o->{meta_class} || 'PowerPack', + }); + substInFile { s/KEYBOARD_AT_BOOT=.*/KEYBOARD_AT_BOOT=yes/ } "$o->{prefix}/etc/sysconfig/usb" if detect_devices::usbKeyboards(); + + } 'installPackages'; } #------------------------------------------------------------------------------ |