From 28c3d0bc77e2c75404454a772e72f025658db9ef Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 7 Jan 2003 16:21:38 +0000
Subject: fix ask_okcancel in wizard mode

---
 perl-install/interactive.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/interactive.pm')

diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index efc823418..d3710dfca 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -137,7 +137,7 @@ sub ask_okcancel {
 
     if ($::isWizard) {
 	$::no_separator = 1;
-    	$o->ask_from_no_check({ title => $title, messages => $message, focus_cancel => !$def });
+    	$o->ask_from_no_check({ title => $title, messages => $message, focus_cancel => !$def }, []);
     } else {
 	ask_from_list_($o, $title, $message, [ N_("Ok"), N_("Cancel") ], $def ? "Ok" : "Cancel", $help) eq "Ok";
     }
-- 
cgit v1.2.1