From 0ac2e5eb18fa2468e906f1835773d8d839ffa9fe Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 2 May 2000 23:42:08 +0000 Subject: no_comment --- perl-install/any.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/any.pm') diff --git a/perl-install/any.pm b/perl-install/any.pm index bd7098285..61ad2d7ec 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -75,6 +75,9 @@ sub setupBootloader { #- at least one method grep_each { $::b } %{$b->{methods}} or return; + #- put lilo if grub is chosen, so that /etc/lilo.conf is generated + exists $b->{methods}{lilo} and $b->{methods}{lilo} = 1 if $b->{methods}{grub}; + my @l = ( _("Boot device") => { val => \$b->{boot}, list => [ map { "/dev/$_" } (map { $_->{device} } @$hds, @$fstab), detect_devices::floppies() ], not_edit => !$::expert }, _("LBA (doesn't work on old BIOSes)") => { val => \$b->{lba32}, type => "bool", text => "lba" }, -- cgit v1.2.1