From 922306ae1d149c5a3778d85aa4ab6fabfdf935f3 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 2 Jan 2008 18:25:59 +0000 Subject: allow to set zero values in module options (#26515, backport from trunk) --- perl-install/NEWS | 1 + perl-install/modules/interactive.pm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/perl-install/NEWS b/perl-install/NEWS index 3c1cf2c9d..ef3426e94 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -15,6 +15,7 @@ (so that storage devices get detected at first boot on live) o mark the service as interactive, so that package requests are displayed with parallell init + o allow to set zero values in module options (#26515) Version 10.4.239 - 5 October 2007, by Thierry Vignaud diff --git a/perl-install/modules/interactive.pm b/perl-install/modules/interactive.pm index df462e0f9..ca2a90f42 100644 --- a/perl-install/modules/interactive.pm +++ b/perl-install/modules/interactive.pm @@ -20,7 +20,7 @@ sub config_window { return; } if ($in->ask_from(N("Module configuration"), N("You can configure each parameter of the module here."), \@l)) { - my $options = join(' ', map { if_($conf{$_}, "$_=$conf{$_}") } keys %conf); + my $options = join(' ', map { if_(defined $conf{$_}, "$_=$conf{$_}") } keys %conf); if ($options) { $modules_conf->set_options($data->{driver}, $options); $modules_conf->write; -- cgit v1.2.1