diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-01-24 23:02:51 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-01-24 23:02:51 +0000 |
commit | 78c587b831f13669cf7e17a2dec44cd98420c28d (patch) | |
tree | c138f4d38dc46f21bd40ac5fb9e7e7365df30603 | |
parent | 50751063d471f2aac6326de4d544cd0d3148adea (diff) | |
download | drakx-backup-do-not-use-78c587b831f13669cf7e17a2dec44cd98420c28d.tar drakx-backup-do-not-use-78c587b831f13669cf7e17a2dec44cd98420c28d.tar.gz drakx-backup-do-not-use-78c587b831f13669cf7e17a2dec44cd98420c28d.tar.bz2 drakx-backup-do-not-use-78c587b831f13669cf7e17a2dec44cd98420c28d.tar.xz drakx-backup-do-not-use-78c587b831f13669cf7e17a2dec44cd98420c28d.zip |
(afterInstallPackages): cleanup
-rw-r--r-- | perl-install/install_steps.pm | 15 |
1 files changed, 3 insertions, 12 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 74955e357..37f4c8593 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -92,7 +92,7 @@ sub selectLanguage { if ($o->{keyboard_unsafe} || !$o->{keyboard}) { $o->{keyboard_unsafe} = 1; $o->{keyboard} = keyboard::lang2keyboard($o->{lang}); - selectKeyboard($o) unless $::live; + selectKeyboard($o) if !$::live; } } #------------------------------------------------------------------------------ @@ -409,17 +409,8 @@ Consoles 1,3,4,7 may also contain interesting information"; #- make sure some services have been enabled (or a catastrophic restart will occur). #- these are normally base package post install scripts or important services to start. - run_program::rooted($o->{prefix}, "chkconfig", "--add", "random"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "netfs"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "network"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "rawdevices"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "sound"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "kheader"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "usb"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "keytable"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "syslog"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "crond"); - run_program::rooted($o->{prefix}, "chkconfig", "--add", "portmap"); + run_program::rooted($o->{prefix}, "chkconfig", "--add", $_) foreach + qw(random netfs network rawdevices sound kheader usb keytable syslog crond portmap); #- call update-menus at the end of package installation run_program::rooted($o->{prefix}, "update-menus"); |