diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-06-05 16:02:15 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-06-05 16:02:15 +0000 |
commit | 685b036bb5b61056ca90b78580c1320d2b54018c (patch) | |
tree | 10f3329c480c5839c087071605723a7aee67acec /perl-install/bootloader.pm | |
parent | d5b3a62d49ad6e636d77c4f094d13fd608d287b0 (diff) | |
download | drakx-685b036bb5b61056ca90b78580c1320d2b54018c.tar drakx-685b036bb5b61056ca90b78580c1320d2b54018c.tar.gz drakx-685b036bb5b61056ca90b78580c1320d2b54018c.tar.bz2 drakx-685b036bb5b61056ca90b78580c1320d2b54018c.tar.xz drakx-685b036bb5b61056ca90b78580c1320d2b54018c.zip |
adapt to new lilo
Diffstat (limited to 'perl-install/bootloader.pm')
-rw-r--r-- | perl-install/bootloader.pm | 28 |
1 files changed, 5 insertions, 23 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 7bc17b097..a5b7638d3 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -343,7 +343,6 @@ sub suggest { lba32 => 1, boot => "/dev/" . ($onmbr ? $hds->[0]{device} : fsedit::get_root($fstab, 'boot')->{device}), map => "/boot/map", - install => "/boot/boot.b", ), }); @@ -450,7 +449,7 @@ wait %d seconds for default boot. ); unless ($lilo->{methods}) { $lilo->{methods} ||= { map { $_ => 1 } grep { $l{$_} } keys %l }; - if ($lilo->{methods}{lilo} && -e "$prefix/boot/lilo-graphic") { + if ($lilo->{methods}{lilo} && -e "$prefix/boot/message-graphic") { $lilo->{methods}{lilo} = "lilo-graphic"; exists $lilo->{methods}{grub} and $lilo->{methods}{grub} = undef; } @@ -696,27 +695,6 @@ sub write_lilo_conf { } }; - if ($lilo->{message}) { - local *F; - -d "$prefix/boot/lilo-menu" and open F, ">$prefix/boot/lilo-menu/message" and print F $lilo->{message}; - -d "$prefix/boot/lilo-text" and open F, ">$prefix/boot/lilo-text/message" and print F $lilo->{message}; - -d "$prefix/boot/lilo-graphic" || -d "$prefix/boot/lilo-menu" || -d "$prefix/boot/lilo-text" or - open F, ">$prefix/boot/message" and print F $lilo->{message}; #- fallback in case of another lilo. - } - foreach ($lilo->{methods}{lilo}, "lilo-menu", "lilo-graphic", "lilo-text") { - if (-e "$prefix/boot/$_/boot.b" && -e "$prefix/boot/$_/message") { - symlinkf $_, "$prefix/boot/lilo"; - symlinkf "lilo/boot.b", "$prefix/boot/boot.b"; - symlinkf "lilo/message", "$prefix/boot/message"; - log::l("stage2 of lilo used is " . readlink "$prefix/boot/lilo"); - last; - } - } - if (arch() !~ /ia64/) { - -e "$prefix/boot/boot.b" && -e "$prefix/boot/message" or die "unable to get right lilo configuration in $prefix/boot"; - } - - my %bios2dev = map_index { $::i => $_ } dev2bios($hds, $lilo->{first_hd_device} || $lilo->{boot}); my %dev2bios = reverse %bios2dev; @@ -803,6 +781,10 @@ sub write_lilo_conf { sub install_lilo { my ($prefix, $lilo, $fstab, $hds) = @_; + $lilo->{install} = 'text' if $lilo->{methods}{lilo} eq 'lilo-text'; + output("$prefix/boot/message-text", $lilo->{message}) if $lilo->{message}; + symlinkf "message-" . ($lilo->{methods}{lilo} eq 'lilo-graphic' ? 'graphic' : 'text'), "$prefix/boot/message"; + write_lilo_conf($prefix, $lilo, $fstab, $hds); log::l("Installing boot loader..."); |