summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-20 15:11:47 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-20 15:11:47 +0000
commitac8a9fbea5d45369f3a48fe518fd932682e44d7a (patch)
treec0e7f97d5efb6121f87f00ce5926c637e697a19e /perl-install/any.pm
parentf49ea815cc1c84571ebc34214aeff5ff668f62b9 (diff)
downloaddrakx-backup-do-not-use-ac8a9fbea5d45369f3a48fe518fd932682e44d7a.tar
drakx-backup-do-not-use-ac8a9fbea5d45369f3a48fe518fd932682e44d7a.tar.gz
drakx-backup-do-not-use-ac8a9fbea5d45369f3a48fe518fd932682e44d7a.tar.bz2
drakx-backup-do-not-use-ac8a9fbea5d45369f3a48fe518fd932682e44d7a.tar.xz
drakx-backup-do-not-use-ac8a9fbea5d45369f3a48fe518fd932682e44d7a.zip
- add "Force No APIC"
- rename add_append() to set_append() (since it can be used to remove a key) - add remove_append_simple()
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm17
1 files changed, 9 insertions, 8 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 235033fa9..779f8fd11 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -239,8 +239,8 @@ sub setupBootloader__general {
($b->{method}, my $method_choices) = bootloader::method_choices($fstab);
my $profiles = bootloader::has_profiles($b);
- my $previous_acpi_val = bootloader::get_append($b, 'acpi');
- my $force_acpi = $previous_acpi_val eq 'on';
+ my $prev_force_acpi = my $force_acpi = bootloader::get_append($b, 'acpi') ne 'off';
+ my $prev_force_noapic = my $force_noapic = bootloader::get_append($b, 'noapic');
my $memsize = bootloader::get_append($b, 'mem');
my $prev_clean_tmp = my $clean_tmp = any { $_->{mntpoint} eq '/tmp' } @{$all_hds->{special} ||= []};
my $prev_boot = $b->{boot};
@@ -261,9 +261,8 @@ sub setupBootloader__general {
{ label => N("Video mode"), val => \$b->{vga}, list => [ keys %bootloader::vga_modes ], not_edit => !$::expert, format => sub { $bootloader::vga_modes{$_[0]} }, advanced => 1 },
),
{ label => N("Delay before booting default image"), val => \$b->{timeout} },
- if_($previous_acpi_val,
{ label => N("Force ACPI"), val => \$force_acpi, type => 'bool' },
- ),
+ { label => N("Force No APIC"), val => \$force_noapic, type => 'bool' },
if_($security >= 4 || $b->{password} || $b->{restricted},
{ label => N("Password"), val => \$b->{password}, hidden => 1 },
{ label => N("Password (again)"), val => \$b->{password2}, hidden => 1 },
@@ -309,10 +308,12 @@ sub setupBootloader__general {
}
bootloader::set_profiles($b, $profiles);
- bootloader::add_append($b, "mem", $memsize);
- if ($previous_acpi_val) {
- my $s = $force_acpi ? 'on' : 'off';
- bootloader::add_append($b, acpi => $s) if $s ne $previous_acpi_val;
+ bootloader::set_append($b, "mem", $memsize);
+ if ($prev_force_acpi != $force_acpi) {
+ bootloader::set_append($b, acpi => ($force_acpi ? '' : 'off'));
+ }
+ if ($prev_force_noapic != $force_noapic) {
+ ($force_noapic ? \&bootloader::set_append : \&bootloader::remove_append_simple)->($b, 'noapic');
}
if ($prev_clean_tmp != $clean_tmp) {