diff options
Diffstat (limited to 'perl-install/standalone/service_harddrake_confirm')
| -rw-r--r-- | perl-install/standalone/service_harddrake_confirm | 7 |
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); |