From 43146be1c2ccd0c1bdc309ec9d0fb28ce93aa572 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 5 Apr 2013 11:33:53 +0000 Subject: read back xen conf from grub2 --- perl-install/bootloader.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/bootloader.pm') diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 360f20c0f..b1d48cd65 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -244,9 +244,9 @@ sub read_grub2 { if (/menuentry\s+['"]([^']+)["']/) { push @{$bootloader{entries}}, $entry if $entry; $entry = { label => $1 }; - } elsif (/linux\s+(\S+)\s+(.*)?/) { + } elsif (/linux\s+(\S+)\s+(.*)?/ || /module\s+(\S+vmlinu\S+)\s+(.*)?/) { @$entry{qw(kernel_or_dev append)} = ($1, $2); - } elsif (/initrd\s+(\S+)/) { + } elsif (/initrd\s+(\S+)/ || /module\s+(\S+initrd\S+)\s+(.*)?/) { $entry->{initrd} = $1; } } -- cgit v1.2.1