summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2005-10-06 19:40:23 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2005-10-06 19:40:23 +0000
commita4828e8f810dcb317d86948ad49853b4fb96a154 (patch)
treeaf8cdc80c4fce2d3918b1b1cd01e2986ad28f6c4 /perl-install
parentaff9fbe2314113929f24c245870bd4312d206400 (diff)
downloaddrakx-backup-do-not-use-a4828e8f810dcb317d86948ad49853b4fb96a154.tar
drakx-backup-do-not-use-a4828e8f810dcb317d86948ad49853b4fb96a154.tar.gz
drakx-backup-do-not-use-a4828e8f810dcb317d86948ad49853b4fb96a154.tar.bz2
drakx-backup-do-not-use-a4828e8f810dcb317d86948ad49853b4fb96a154.tar.xz
drakx-backup-do-not-use-a4828e8f810dcb317d86948ad49853b4fb96a154.zip
(config_window) properly report no configurable parameter (#17579)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/modules/interactive.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/modules/interactive.pm b/perl-install/modules/interactive.pm
index ead9e7b71..de7adc92b 100644
--- a/perl-install/modules/interactive.pm
+++ b/perl-install/modules/interactive.pm
@@ -15,10 +15,10 @@ sub config_window {
push @l, { label => $name, help => join("\n", $description, if_(c::kernel_version() !~ /^\Q2.6/, "[$format]")),
val => \$conf{$name}, allow_empty_list => 1 };
}
- # BUG: once we've released mdk9.2 and unfreeze cooker, morph this
- # into a proper error dialog with a nice error message (but
- # for now we cannot due to string freeze :-()
- @l = { label => N("Parameters"), help => "", val => N("NONE"), allow_empty_list => 1 } if !@l;
+ if (!@l) {
+ $in->ask_warn(N("Error"), N("This driver has no configuration parameter!"));
+ 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);
if ($options) {