summaryrefslogtreecommitdiffstats
path: root/docs/interactive/wait_message
diff options
context:
space:
mode:
authorYves Duret <yduret@mandriva.com>2002-01-29 16:13:04 +0000
committerYves Duret <yduret@mandriva.com>2002-01-29 16:13:04 +0000
commit68cb104a88ae6fef8298acab166dccd464d170b7 (patch)
tree1cf1f7b49a244357a5086dcb24055a6d8576f2b4 /docs/interactive/wait_message
parent58be4a692e597d85219f921181c0e7f01f9844cc (diff)
downloaddrakx-backup-do-not-use-68cb104a88ae6fef8298acab166dccd464d170b7.tar
drakx-backup-do-not-use-68cb104a88ae6fef8298acab166dccd464d170b7.tar.gz
drakx-backup-do-not-use-68cb104a88ae6fef8298acab166dccd464d170b7.tar.bz2
drakx-backup-do-not-use-68cb104a88ae6fef8298acab166dccd464d170b7.tar.xz
drakx-backup-do-not-use-68cb104a88ae6fef8298acab166dccd464d170b7.zip
added some snipet coe for example
Diffstat (limited to 'docs/interactive/wait_message')
-rwxr-xr-xdocs/interactive/wait_message13
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);