summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-01-24 23:02:51 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-01-24 23:02:51 +0000
commit78c587b831f13669cf7e17a2dec44cd98420c28d (patch)
treec138f4d38dc46f21bd40ac5fb9e7e7365df30603 /perl-install
parent50751063d471f2aac6326de4d544cd0d3148adea (diff)
downloaddrakx-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
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps.pm15
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");