summaryrefslogtreecommitdiffstats
path: root/docs/interactive/ask_from_list
diff options
context:
space:
mode:
authorMystery Man <unknown@mandriva.org>2002-10-30 17:22:17 +0000
committerMystery Man <unknown@mandriva.org>2002-10-30 17:22:17 +0000
commit75ebb7492ad8f729ae6ea34960f07b7ed650310c (patch)
tree560408cfbe6ae46f9938457e2dcad4e31e8dc2c4 /docs/interactive/ask_from_list
parentb91853177bc253b1afe8af21bd4fd4ed2f5dcd68 (diff)
downloaddrakx-KA9_0_noscsi.tar
drakx-KA9_0_noscsi.tar.gz
drakx-KA9_0_noscsi.tar.bz2
drakx-KA9_0_noscsi.tar.xz
drakx-KA9_0_noscsi.zip
This commit was manufactured by cvs2svn to create tag 'KA9_0_noscsi'.KA9_0_noscsi
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);
-