summaryrefslogtreecommitdiffstats
path: root/perl-install/bootloader.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-02-06 19:08:27 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-02-06 19:08:27 +0000
commitcbf3e348886d6be543225063c1846601bd1339de (patch)
tree0a01b9f44f0f32cc70fb1b4088dfc814936980af /perl-install/bootloader.pm
parent597782cc9b1ad55e0552290539c07d1f91f28fd7 (diff)
downloaddrakx-backup-do-not-use-cbf3e348886d6be543225063c1846601bd1339de.tar
drakx-backup-do-not-use-cbf3e348886d6be543225063c1846601bd1339de.tar.gz
drakx-backup-do-not-use-cbf3e348886d6be543225063c1846601bd1339de.tar.bz2
drakx-backup-do-not-use-cbf3e348886d6be543225063c1846601bd1339de.tar.xz
drakx-backup-do-not-use-cbf3e348886d6be543225063c1846601bd1339de.zip
special way to remove mem=<memsize>
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 4a83f3c3a..d4e5297d1 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -381,7 +381,7 @@ sub set_append {
my ($simple, $dict) = @_;
if ($has_val) {
@$dict = grep { $_->[0] ne $key || $key eq 'mem' && append__mem_is_memsize($_->[1]) != append__mem_is_memsize($val) } @$dict;
- push @$dict, [ $key, $val ] if $val ne '';
+ push @$dict, [ $key, $val ] if !($val eq '' || $key eq 'mem' && !$val);
} else {
@$simple = grep { $_ ne $key } @$simple;
push @$simple, $key;