diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/bootloader.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 7ad0650ae..feac63642 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -82,7 +82,8 @@ sub read() { my ($e, $v, $f); my %b; foreach (cat_("$::prefix$file")) { - ($_, $v) = /^\s*(.*?)\s*(?:=\s*(.*?))?\s*$/; + next if /^\s*#/ || /^\s*$/; + ($_, $v) = /^\s*(\S+)\s*(?:=\s*(.*?))?\s*$/ or log::l("unknown line in lilo.conf: $_"), next; if (/^(image|other)$/) { if (arch() =~ /ppc/) { |