diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-09-18 15:08:33 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-09-18 15:23:31 +0200 |
commit | 59dfe929349aa4e9f138cd2e311fda9dad146b5a (patch) | |
tree | ebd28311cc719a27e4bcc5499f04d860907e64c9 /perl-install | |
parent | 1941fa3c6e9a68a1004c92f42493508bb46a32b5 (diff) | |
download | drakx-59dfe929349aa4e9f138cd2e311fda9dad146b5a.tar drakx-59dfe929349aa4e9f138cd2e311fda9dad146b5a.tar.gz drakx-59dfe929349aa4e9f138cd2e311fda9dad146b5a.tar.bz2 drakx-59dfe929349aa4e9f138cd2e311fda9dad146b5a.tar.xz drakx-59dfe929349aa4e9f138cd2e311fda9dad146b5a.zip |
(read_grub2) handle several levels of submenus
needed anyway after last commit
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/bootloader.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 1e629345e..42f4f9586 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -327,7 +327,7 @@ sub read_grub2() { } } elsif (/initrd\s+(\S+)/ || /module\s+(\S+initrd\S+)\s+(.*)?/) { $entry->{initrd} = $1; - } elsif (/^submenu\s+['"]([^']+)["']/) { + } elsif (/submenu\s+['"]([^']+)["']/) { push @menus, $1; } elsif (/^\s+}/) { if ($entry) { |