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/wait_message | |
| 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/wait_message')
| -rwxr-xr-x | docs/interactive/wait_message | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/docs/interactive/wait_message b/docs/interactive/wait_message new file mode 100755 index 000000000..0caec4471 --- /dev/null +++ b/docs/interactive/wait_message @@ -0,0 +1,13 @@ +#!/usr/bin/perl +# Yves Duret <yduret at mandrakesoft.com> +# license: GPL + +use lib qw(/usr/lib/libDrakX); +use interactive; + +my $in = 'interactive'->vnew(undef, 'default'); +my $wait = $in->wait_message('wainting title', _("Moving files to the new partition")); +sleep(3); +$wait->set(_("Removing")); +sleep(3); +$in->exit(0); |