summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-11-04 11:22:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-11-04 11:22:19 +0000
commit27e17fdfd00658c75926da75c45c6d3322f20658 (patch)
treee3fffb2d0cf982b687c2f198c1cfd8baab84ec4a /perl-install
parent26b7ad919e3dabb83d0be9fc0619c6762a35b8ba (diff)
downloaddrakx-backup-do-not-use-27e17fdfd00658c75926da75c45c6d3322f20658.tar
drakx-backup-do-not-use-27e17fdfd00658c75926da75c45c6d3322f20658.tar.gz
drakx-backup-do-not-use-27e17fdfd00658c75926da75c45c6d3322f20658.tar.bz2
drakx-backup-do-not-use-27e17fdfd00658c75926da75c45c6d3322f20658.tar.xz
drakx-backup-do-not-use-27e17fdfd00658c75926da75c45c6d3322f20658.zip
allow setting hdclun=0
Diffstat (limited to 'perl-install')
-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 b7480dda0..b213808b6 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -371,7 +371,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;
+ push @$dict, [ $key, $val ] if $val ne '';
} else {
@$simple = grep { $_ ne $key } @$simple;
push @$simple, $key;