diff options
Diffstat (limited to 'perl-install')
-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 e585aba34..07bcdd750 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -191,11 +191,11 @@ sub read_grub { my $global = 1; my ($e, %b); - my $grub2dev = read_grub_device_map(); - my $menu_lst_file = "$::prefix/boot/grub/menu.lst"; -e $menu_lst_file or return; + my $grub2dev = read_grub_device_map(); + foreach (cat_($menu_lst_file)) { chomp; s/^\s*//; s/\s*$//; |