diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/bootloader.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index fd0ef7f61..7add5f1c6 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -296,11 +296,12 @@ wait %d seconds for default boot. label => $isSecure || $isSMP ? 'linux-up' : 'linux-nonfb', root => "/dev/$root", }) if $isSecure || $isSMP || $vga_fb; - add_kernel($prefix, $lilo, $kernelVersion, '', + my $entry = add_kernel($prefix, $lilo, $kernelVersion, '', { label => 'failsafe', root => "/dev/$root", - })->{append} .= " failsafe" unless $lilo->{password}; + }); + $entry->{append} .= " failsafe" if $entry && !$lilo->{password}; #- manage older kernel if installed. foreach (qw(2.2 hack)) { |