diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-09-18 15:04:02 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-09-18 15:23:31 +0200 |
| commit | 56c8070207a8395b7fb0c20eb200fd9bd8c76757 (patch) | |
| tree | 07dc186b933a63095522712dfdd1ae978ffbca3d /perl-install/bootloader.pm | |
| parent | 0b40bddaa05d73a11a4835cf70df2c220bf0ee4b (diff) | |
| download | drakx-56c8070207a8395b7fb0c20eb200fd9bd8c76757.tar drakx-56c8070207a8395b7fb0c20eb200fd9bd8c76757.tar.gz drakx-56c8070207a8395b7fb0c20eb200fd9bd8c76757.tar.bz2 drakx-56c8070207a8395b7fb0c20eb200fd9bd8c76757.tar.xz drakx-56c8070207a8395b7fb0c20eb200fd9bd8c76757.zip | |
(read_grub2) handle both linux & linux16
thus we got more data
Diffstat (limited to 'perl-install/bootloader.pm')
| -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 6f9ff4eec..cf3dfbc18 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -317,7 +317,7 @@ sub read_grub2() { next if /^#/; if (/menuentry\s+['"]([^']+)["']/) { $entry = { label => $1, real_label => join('>', @menus, $1) }; - } elsif (/linux\s+(\S+)\s+(.*)?/ || /module\s+(\S+vmlinu\S+)\s+(.*)?/) { + } elsif (/linux(?:16)?\s+([^-]\S+)\s+(.*)?/ || /module\s+(\S+vmlinu\S+)\s+(.*)?/) { $entry->{type} = 'image'; @$entry{qw(kernel_or_dev append)} = ($1, $2); my ($vga, $other) = partition { /^vga=/ } split(' ', $entry->{append}); |