summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-04-19 11:17:29 +0000
committerFrancois Pons <fpons@mandriva.com>2000-04-19 11:17:29 +0000
commit9ac13461f4c9348b073f33b2331ffdd7d5b70bd5 (patch)
treeda576a8e51158ef7fd735437c54aad2d9559d1a2
parent29ceaa1736ec43cdba23320689cb696925e1b80d (diff)
downloaddrakx-9ac13461f4c9348b073f33b2331ffdd7d5b70bd5.tar
drakx-9ac13461f4c9348b073f33b2331ffdd7d5b70bd5.tar.gz
drakx-9ac13461f4c9348b073f33b2331ffdd7d5b70bd5.tar.bz2
drakx-9ac13461f4c9348b073f33b2331ffdd7d5b70bd5.tar.xz
drakx-9ac13461f4c9348b073f33b2331ffdd7d5b70bd5.zip
*** empty log message ***
-rw-r--r--perl-install/interactive.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index b6beb96a4..20f16c442 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -127,6 +127,12 @@ sub ask_from_list_with_help {
goto &ask_from_list2_with_help;
}
+#- defaults to simple ask_from_list
+sub ask_from_list_with_helpW {
+ my ($o, $title, $messages, $l, $help, $def) = @_;
+ ask_from_listW($o, $title, $messages, $l, $def);
+}
+
sub ask_from_list2_with_help_($$$$$;$) {
my ($o, $title, $message, $l, $help, $def) = @_;
untranslate(