diff options
| -rw-r--r-- | perl-install/bootloader.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 7fd66240b..56da1f487 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -828,7 +828,7 @@ sub check_enough_space() { sub write_yaboot { my ($bootloader, $_hds) = @_; - $bootloader->{prompt} = $bootloader->{timeout}; + $bootloader->{prompt} ||= $bootloader->{timeout}; if ($bootloader->{message}) { eval { output("$::prefix/boot/message", $bootloader->{message}) } @@ -917,7 +917,7 @@ sub make_label_lilo_compatible { sub write_lilo { my ($bootloader, $hds) = @_; - $bootloader->{prompt} = $bootloader->{timeout}; + $bootloader->{prompt} ||= $bootloader->{timeout}; my $file2fullname = sub { my ($file) = @_; |