diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-03-21 00:06:03 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-03-21 00:06:03 +0000 |
commit | d38a297097180c3e9259ffe671c9496237bda100 (patch) | |
tree | a2410a0e85fecd0f0b26e293177bf9415837e6ad /perl-install | |
parent | a5f277e49fa2b12cc94fd16ddb3a257a133b092a (diff) | |
download | drakx-backup-do-not-use-d38a297097180c3e9259ffe671c9496237bda100.tar drakx-backup-do-not-use-d38a297097180c3e9259ffe671c9496237bda100.tar.gz drakx-backup-do-not-use-d38a297097180c3e9259ffe671c9496237bda100.tar.bz2 drakx-backup-do-not-use-d38a297097180c3e9259ffe671c9496237bda100.tar.xz drakx-backup-do-not-use-d38a297097180c3e9259ffe671c9496237bda100.zip |
(add_kernel): cleanup
(suggest): make it work with kernel22-secure and no kernel22
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/bootloader.pm | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index daf37ef60..32ee2b86d 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -151,11 +151,8 @@ sub add_entry($$) { sub add_kernel($$$$$) { my ($prefix, $lilo, $kernelVersion, $specific, $v) = @_; my $ext = $specific && "-$specific"; $specific =~ s/\d+\.\d+|hack//; - my $kname = "vmlinuz"; - if (arch() =~ /ppc/) { - $kname = "vmlinux"; - } - my ($vmlinuz, $image, $initrdImage) = ("$kname-$kernelVersion$specific", "/boot/$kname$ext", "/boot/initrd$ext.img"); + my $kname = arch() =~ /ppc/ ? "vmlinux" : "vmlinuz"; + my ($vmlinuz, $image, $initrdImage) = ("$kname-$kernelVersion$specific", "/boot/$kname$ext", "/boot/initrd$ext.img"); -e "$prefix/boot/$vmlinuz" or log::l("unable to find kernel image $prefix/boot/$vmlinuz"), return; { my $f = "initrd-$kernelVersion$specific.img"; @@ -324,11 +321,12 @@ wait %d seconds for default boot. label => $oldSecure || $oldSMP ? "linux-${_}up" : "linux-${_}nonfb", root => "/dev/$root", }) if $oldSecure || $oldSMP || $vga_fb; - add_kernel($prefix, $lilo, $oldVersion, $_, + my $entry = add_kernel($prefix, $lilo, $oldVersion, $_, { label => "failsafe-$_", root => "/dev/$root", - })->{append} .= " failsafe" unless $lilo->{password}; + }); + $entry->{append} .= " failsafe" if $entry && !$lilo->{password}; } } |