summaryrefslogtreecommitdiffstats
path: root/docs/interactive/ask_from_list
diff options
context:
space:
mode:
authorMystery Man <unknown@mandriva.org>2002-07-31 23:10:55 +0000
committerMystery Man <unknown@mandriva.org>2002-07-31 23:10:55 +0000
commit6b5bb447b11a31fc0961c20485505a633c9ab4eb (patch)
treeeae73bee290e1e328b539f7649818d7584ee667e /docs/interactive/ask_from_list
parent79d226c48d6de4f26c604ddbd0ce769a58d548c6 (diff)
downloaddrakx-6b5bb447b11a31fc0961c20485505a633c9ab4eb.tar
drakx-6b5bb447b11a31fc0961c20485505a633c9ab4eb.tar.gz
drakx-6b5bb447b11a31fc0961c20485505a633c9ab4eb.tar.bz2
drakx-6b5bb447b11a31fc0961c20485505a633c9ab4eb.tar.xz
drakx-6b5bb447b11a31fc0961c20485505a633c9ab4eb.zip
This commit was manufactured by cvs2svn to create tag 'V1_1_8_16mdk'.V1_1_8_16mdk
Diffstat (limited to 'docs/interactive/ask_from_list')
-rwxr-xr-xdocs/interactive/ask_from_list27
1 files changed, 0 insertions, 27 deletions
diff --git a/docs/interactive/ask_from_list b/docs/interactive/ask_from_list
deleted file mode 100755
index 63c0ee996..000000000
--- a/docs/interactive/ask_from_list
+++ /dev/null
@@ -1,27 +0,0 @@
-#!/usr/bin/perl
-# Yves Duret <yduret at mandrakesoft.com>
-# license: GPL
-
-use lib qw(/usr/lib/libDrakX);
-use common;
-use interactive;
-
-my %l = (
- 0 => "Welcome To Crackers",
- 1 => "Poor",
- 2 => "Low",
- 3 => "Medium",
- 4 => "High",
- 5 => "Paranoid",
- );
-
-my $in = 'interactive'->vnew(undef, 'default');
-
-my $level = $in->ask_from_list("window title - ask_from_list",
- "radio button\nexamples of utilisation of ask_from_list",
- [ values %l ], $l{2}
- ) or $in->exit(0);
-
-print "$level\n";
-$in->exit(0);
-