diff options
| author | Yves Duret <yduret@mandriva.com> | 2002-01-29 16:13:04 +0000 |
|---|---|---|
| committer | Yves Duret <yduret@mandriva.com> | 2002-01-29 16:13:04 +0000 |
| commit | 68cb104a88ae6fef8298acab166dccd464d170b7 (patch) | |
| tree | 1cf1f7b49a244357a5086dcb24055a6d8576f2b4 /docs/interactive/ask_from_treelist | |
| parent | 58be4a692e597d85219f921181c0e7f01f9844cc (diff) | |
| download | drakx-68cb104a88ae6fef8298acab166dccd464d170b7.tar drakx-68cb104a88ae6fef8298acab166dccd464d170b7.tar.gz drakx-68cb104a88ae6fef8298acab166dccd464d170b7.tar.bz2 drakx-68cb104a88ae6fef8298acab166dccd464d170b7.tar.xz drakx-68cb104a88ae6fef8298acab166dccd464d170b7.zip | |
added some snipet coe for example
Diffstat (limited to 'docs/interactive/ask_from_treelist')
| -rwxr-xr-x | docs/interactive/ask_from_treelist | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/docs/interactive/ask_from_treelist b/docs/interactive/ask_from_treelist new file mode 100755 index 000000000..ade7141d4 --- /dev/null +++ b/docs/interactive/ask_from_treelist @@ -0,0 +1,27 @@ +#!/usr/bin/perl +# Yves Duret <yduret at mandrakesoft.com> +# license: GPL + +use lib qw(/usr/lib/libDrakX); +use common; +use interactive; + +my $in = 'interactive'->vnew(undef, 'default'); +my $foo = $in->ask_from_treelist("window title - ask_from_treelist", + "message\nexamples of utilisation of ask_from_treelist", + '|', + ['Custom', + 'Other|Unlisted', + 'Matrox|Millennium II=>Matrox Millennium II', + 'Matrox|Millennium G200=>Matrox Millennium G200', + 'Matrox|Millennium G400=>Matrox Millennium G400', + 'Matrox|Millennium G450=>Matrox Millennium G450', + 'Matrox|Millennium G550=>Matrox Millennium G550', + 'Sun|FFB 67MHz Creator=>Sun FFB 67MHz Creator', + 'Sun|FFB 67MHz Creator 3D=>Sun FFB 67MHz Creator 3D', + 'Sun|FFB 75MHz Creator 3D=>Sun FFB 75MHz Creator 3D', + ], + 'Custom' + ) or $in->exit(0); +print "$foo\n"; +$in->exit(0); |