summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-10-15 00:49:48 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-10-15 00:49:48 +0000
commit1bd0d70a43bc734b826ae3f181b057aa22c977d7 (patch)
treed6d052d0b5944dd308dbe5b496f0767a9ff3891c /perl-install/install_steps_interactive.pm
parent613c0e3b6d083c8a552e6e8b34bf0e52a4b4f23b (diff)
downloaddrakx-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar
drakx-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar.gz
drakx-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar.bz2
drakx-1bd0d70a43bc734b826ae3f181b057aa22c977d7.tar.xz
drakx-1bd0d70a43bc734b826ae3f181b057aa22c977d7.zip
no_comment
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 1d08f6da2..cf051fa1c 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -742,7 +742,7 @@ sub load_module {
my @names = modparm::get_options_name($m);
- if ((!defined @names || @names > 0) && $o->ask_from_list('',
+ if ((@names != 0) && $o->ask_from_list('',
_("In some cases, the %s driver needs to have extra information to work
properly, although it normally works fine without. Would you like to specify
extra options for it or allow the driver to probe your machine for the
@@ -750,7 +750,7 @@ information it needs? Occasionally, probing will hang a computer, but it should
not cause any damage.", $l),
[ __("Autoprobe"), __("Specify options") ], "Autoprobe") ne "Autoprobe") {
ASK:
- if (defined @names) {
+ if (@names >= 0) {
my @l = $o->ask_from_entries('',
_("You may now provide its options to module %s.", $l),
\@names) or return;