From 352d0383f95262d6add1895362b64559bc77afa1 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 3 Feb 2002 23:42:34 +0000
Subject: - fix some vga text modes 80x30 - chmod 600 lilo.conf when a password
 is given - fix general "append" (thanks to David Eastcott)

---
 perl-install/bootloader.pm | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index bf7683baa..0f6b2b728 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -26,9 +26,9 @@ use modules;
 '0x0f01' => "80x50",
 '0x0f02' => "80x43",
 '0x0f03' => "80x28",
-'0x0f04' => "80x30",
-'0x0f05' => "80x34",
-'0x0f06' => "80x60",
+'0x0f05' => "80x30",
+'0x0f06' => "80x34",
+'0x0f07' => "80x60",
 '0x0122' => "100x30",
  785 => "640x480 in 16 bits (FrameBuffer only)",
  788 => "800x600 in 16 bits (FrameBuffer only)",
@@ -703,12 +703,15 @@ sub write_lilo_conf {
 	open F, ">$f" or die "cannot create lilo config file: $f";
 	log::l("writing lilo config to $f");
 
+	chmod 0600, $f if $lilo->{password};
+
 	#- normalize: RESTRICTED is only valid if PASSWORD is set
 	delete $lilo->{restricted} if !$lilo->{password};
 
 	local $lilo->{default} = make_label_lilo_compatible($lilo->{default});
-	$lilo->{$_} and print F "$_=$lilo->{$_}" foreach qw(boot map install vga default append keytable);
+	$lilo->{$_} and print F "$_=$lilo->{$_}" foreach qw(boot map install vga default keytable);
 	$lilo->{$_} and print F $_ foreach qw(linear lba32 compact prompt restricted);
+	print F "append=\"$lilo->{append}\"" if $lilo->{append};
  	print F "password=", $lilo->{password} if $lilo->{password}; #- also done by msec
 	print F "timeout=", round(10 * $lilo->{timeout}) if $lilo->{timeout};
 	print F "serial=", $1 if get_append($lilo, 'console') =~ /ttyS(.*)/;
-- 
cgit v1.2.1