workaround buggy installkernel that left default value be geater than

the current number of entries, thus making drakboot displaying
(default-entries_count) spurious "()*" entries which then results in
writing back bogus grub conf file.

kernel team should just be shuted down :-(

1 files changed, 2 insertions, 0 deletions

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 48acb42da..af23e2de3 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -132,6 +132,8 @@ sub read_grub() {
     }
 
     $b{nowarn} = 1;
+    # handle broken installkernel -r:
+    $b{default} = min($b{default}, scalar(@{$b{entries}}) -1);
     $b{default} = $b{entries}[$b{default}]{label};
 
     \%b;