summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS1
-rw-r--r--perl-install/bootloader.pm4
2 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 712cb2f50..b0cf09ece 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,4 @@
+- bootloader-config: handle vmdefault and vmdisable lilo.conf options (#26456)
- diskdrake: drop "Rescue partition table" feature
(was based on rescuept which has been dropped in util-linux, but was quite
bad compared to testdisk anyway)
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 366a48f74..12fea67a7 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1287,7 +1287,7 @@ sub write_lilo {
push @conf, "# File generated by DrakX/drakboot";
push @conf, "# WARNING: do not forget to run lilo after modifying this file\n";
push @conf, "default=" . make_label_lilo_compatible($bootloader->{default}) if $bootloader->{default};
- push @conf, map { $_ . '=' . $quotes_if_needed->($bootloader->{$_}) } grep { $bootloader->{$_} } qw(boot root map install serial vga keytable raid-extra-boot menu-scheme);
+ push @conf, map { $_ . '=' . $quotes_if_needed->($bootloader->{$_}) } grep { $bootloader->{$_} } qw(boot root map install serial vga keytable raid-extra-boot menu-scheme vmdefault);
push @conf, grep { $bootloader->{$_} } qw(linear geometric compact prompt nowarn restricted static-bios-codes);
push @conf, "append=" . $quotes->($bootloader->{append}) if $bootloader->{append};
push @conf, "password=" . $bootloader->{password} if $bootloader->{password}; #- also done by msec
@@ -1339,7 +1339,7 @@ sub write_lilo {
}
}
push @entry_conf, "password=$entry->{password}" if $entry->{password};
- push @entry_conf, "restricted" if $entry->{restricted};
+ push @entry_conf, grep { $entry->{$_} } qw(restricted vmwarn vmdisable);
push @conf, map { "\t$_" } @entry_conf;
}