From 681c38ee8d1c313431c93a00f6814cad37d3d7f0 Mon Sep 17 00:00:00 2001
From: Anssi Hannula <anssi@mageia.org>
Date: Wed, 20 Apr 2011 23:32:50 +0000
Subject: service_harddrake: add support for timeouted OK and Yes/No dialogs in
 addition to the current OK/Cancel dialogs.

---
 perl-install/standalone/service_harddrake_confirm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

(limited to 'perl-install/standalone/service_harddrake_confirm')

diff --git a/perl-install/standalone/service_harddrake_confirm b/perl-install/standalone/service_harddrake_confirm
index 914f644f8..f92807e2d 100755
--- a/perl-install/standalone/service_harddrake_confirm
+++ b/perl-install/standalone/service_harddrake_confirm
@@ -4,5 +4,14 @@ use common;
 use interactive;
 
 my $in = interactive->vnew;
-my $res = $in->ask_okcancel($ARGV[0], $ARGV[1], 1);
+my $res;
+
+if ($ARGV[0] eq "warn") {
+    $res = $in->ask_warn($ARGV[1], $ARGV[2]);
+} elsif ($ARGV[0] eq "yesorno") {
+    $res = $in->ask_yesorno($ARGV[1], $ARGV[2], 1);
+} elsif ($ARGV[0] eq "okcancel") {
+    $res = $in->ask_okcancel($ARGV[1], $ARGV[2], 1);
+}
+
 $in->exit($res);
-- 
cgit v1.2.1