summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/service_harddrake_confirm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-04-01 09:29:46 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-04-01 09:29:46 +0000
commit89639cec273d0f7a266991e62329a363e5ad5236 (patch)
tree3176d7ca9d09eb48f3b6eb30c0107fb455424a17 /perl-install/standalone/service_harddrake_confirm
parentcab5f748752bba19fddabd658e052f14b5c17581 (diff)
downloaddrakx-backup-do-not-use-89639cec273d0f7a266991e62329a363e5ad5236.tar
drakx-backup-do-not-use-89639cec273d0f7a266991e62329a363e5ad5236.tar.gz
drakx-backup-do-not-use-89639cec273d0f7a266991e62329a363e5ad5236.tar.bz2
drakx-backup-do-not-use-89639cec273d0f7a266991e62329a363e5ad5236.tar.xz
drakx-backup-do-not-use-89639cec273d0f7a266991e62329a363e5ad5236.zip
move harddrake service confirmation script from spec file into its own file
Diffstat (limited to 'perl-install/standalone/service_harddrake_confirm')
-rw-r--r--perl-install/standalone/service_harddrake_confirm7
1 files changed, 7 insertions, 0 deletions
diff --git a/perl-install/standalone/service_harddrake_confirm b/perl-install/standalone/service_harddrake_confirm
new file mode 100644
index 000000000..99eaf7b0f
--- /dev/null
+++ b/perl-install/standalone/service_harddrake_confirm
@@ -0,0 +1,7 @@
+#!/usr/bin/perl
+use lib qw(/usr/lib/libDrakX);
+use interactive;
+
+my $in = interactive->vnew;
+my $res = $in->ask_okcancel($ARGV[0], $ARGV[1], 1);
+$in->exit($res);