summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-01-27 22:28:10 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-01-27 22:28:10 +0000
commit5d9eeef458159fb0e6b36b6b6d37bdb30436c77d (patch)
tree82e5929713d89812ba60564427bdbd87824146a5 /perl-install
parent897140cfc593b9697dfa383eacaf14affe44edf2 (diff)
downloaddrakx-5d9eeef458159fb0e6b36b6b6d37bdb30436c77d.tar
drakx-5d9eeef458159fb0e6b36b6b6d37bdb30436c77d.tar.gz
drakx-5d9eeef458159fb0e6b36b6b6d37bdb30436c77d.tar.bz2
drakx-5d9eeef458159fb0e6b36b6b6d37bdb30436c77d.tar.xz
drakx-5d9eeef458159fb0e6b36b6b6d37bdb30436c77d.zip
add a minimal example
Diffstat (limited to 'perl-install')
-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 809281ea7..c693155c5 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -9,6 +9,12 @@ use strict;
use MDK::Common::Func;
use common;
+#- minimal example using interactive:
+#- > use interactive;
+#- > my $in = interactive->vnew;
+#- > $in->ask_okcancel('title', 'question');
+#- > $in->exit;
+
#- ask_from_entries takes:
#- val => reference to the value
#- label => description