diff options
| -rw-r--r-- | perl-install/bootloader.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 75785f3ce..4a6102081 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1774,10 +1774,17 @@ sub crypt_grub_password { chomp_($res); } -sub get_grub2_append { +sub get_grub2_first_entry { my ($bootloader) = @_; # set default parameters: my ($entry) = grep { $_->{kernel_or_dev} =~ /vmlin/ } @{$bootloader->{entries}}; + $entry; +} + +sub get_grub2_append { + my ($bootloader) = @_; + # get default parameters: + my ($entry) = get_grub2_first_entry($bootloader); my $append = $entry->{append}; if (my $vga = $entry->{vga} || $bootloader->{vga}) { $append .= " vga=$vga"; |