summaryrefslogtreecommitdiffstats
path: root/perl-install/bootloader.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-02-09 10:07:55 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-02-09 10:07:55 +0000
commit94b751dceda283748dd4b2327a890b917b8be217 (patch)
tree1d195218d7304d72cd53f603edb67465dce3cf75 /perl-install/bootloader.pm
parent58551a88694dde4a93d04e7b45781b554a17b4c2 (diff)
downloaddrakx-94b751dceda283748dd4b2327a890b917b8be217.tar
drakx-94b751dceda283748dd4b2327a890b917b8be217.tar.gz
drakx-94b751dceda283748dd4b2327a890b917b8be217.tar.bz2
drakx-94b751dceda283748dd4b2327a890b917b8be217.tar.xz
drakx-94b751dceda283748dd4b2327a890b917b8be217.zip
fix ugly typo (especially causing acpi to not be set in drakboot --boot)
Diffstat (limited to 'perl-install/bootloader.pm')
-rw-r--r--perl-install/bootloader.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 64d1d2e25..6b34749e5 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -563,7 +563,7 @@ sub set_append_with_key {
my ($_simple, $dict) = @_;
if ($val eq '') {
- @$dict = grep { $_ ne $key } @$dict;
+ @$dict = grep { $_->[0] ne $key } @$dict;
} else {
push @$dict, [ $key, $val ];
}