diff options
| author | Olivier Blin <blino@mageia.org> | 2012-05-10 22:46:24 +0000 |
|---|---|---|
| committer | Olivier Blin <blino@mageia.org> | 2012-05-10 22:46:24 +0000 |
| commit | 115ace0f31510647563a72ff36a15a9bff88a971 (patch) | |
| tree | adc8fb2c665780203fb377d2f8f945c0c7d0464d /perl-install/modules/interactive.pm | |
| parent | 21222648a9999f22e975b68587b2e13895b24a47 (diff) | |
| download | drakx-115ace0f31510647563a72ff36a15a9bff88a971.tar drakx-115ace0f31510647563a72ff36a15a9bff88a971.tar.gz drakx-115ace0f31510647563a72ff36a15a9bff88a971.tar.bz2 drakx-115ace0f31510647563a72ff36a15a9bff88a971.tar.xz drakx-115ace0f31510647563a72ff36a15a9bff88a971.zip | |
harddrake2: allow writing 0 as module option, and forbid options with spaces (from Colin)
Diffstat (limited to 'perl-install/modules/interactive.pm')
| -rw-r--r-- | perl-install/modules/interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/modules/interactive.pm b/perl-install/modules/interactive.pm index 956d98bd1..abb1e9a82 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_($conf{$_} =~ /^\S+$/, "$_=$conf{$_}") } keys %conf); my $old_options = $modules_conf->get_options($data->{driver}); if ($options ne $old_options) { $modules_conf->set_options($data->{driver}, $options); |