summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/Xconfig/various.pm11
1 files changed, 5 insertions, 6 deletions
diff --git a/perl-install/Xconfig/various.pm b/perl-install/Xconfig/various.pm
index 3a961aa7d..25e04e87a 100644
--- a/perl-install/Xconfig/various.pm
+++ b/perl-install/Xconfig/various.pm
@@ -53,11 +53,11 @@ sub various {
}
sub runlevel {
- my ($runlevel) = @_;
+ my ($o_runlevel) = @_;
my $f = "$::prefix/etc/inittab";
-r $f or log::l("missing inittab!!!"), return;
- if ($runlevel) {
- substInFile { s/^id:\d:initdefault:\s*$/id:$runlevel:initdefault:\n/ } $f if !$::testing;
+ if ($o_runlevel) {
+ substInFile { s/^id:\d:initdefault:\s*$/id:$o_runlevel:initdefault:\n/ } $f if !$::testing;
} else {
cat_($f) =~ /^id:(\d):initdefault:\s*$/m && $1;
}
@@ -131,9 +131,8 @@ sub configure_FB_TVOUT {
require bootloader;
require fsedit;
require detect_devices;
- my ($bootloader, $all_hds) =
- $::isInstall ? ($::o->{bootloader}, $::o->{all_hds}) :
- (bootloader::read(), fsedit::get_hds());
+ my $all_hds = $::isInstall ? $::o->{all_hds} : fsedit::get_hds();
+ my $bootloader = $::isInstall ? $::o->{bootloader} : bootloader::read(fs::get::fstab($all_hds));
if (my $tvout = bootloader::duplicate_kernel_entry($bootloader, 'TVout')) {
$tvout->{append} .= " XFree=tvout";