service_harddrake_confirm « standalone « perl-install - drakx-backup-do-not-use - Mageia Installer and base platform for many utilities

index : drakx-backup-do-not-use

Mageia Installer and base platform for many utilities

Thierry Vignaud [tv]

summary refs log tree commit diff stats

path: root/perl-install/standalone/service_harddrake_confirm

blob: 914f644f8f291f797e557d9a9ea1e56642550cd8 (plain)

#!/usr/bin/perl
use lib qw(/usr/lib/libDrakX);
use common;
use interactive;

my $in = interactive->vnew;
my $res = $in->ask_okcancel($ARGV[0], $ARGV[1], 1);
$in->exit($res);