From 386318f9c15d842e2289773e8fb11f884da27a12 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Mon, 12 Mar 2001 01:15:13 +0000
Subject: corrected bad okcanel in wizard mode

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

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

diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index ea1945269..00d450369 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -100,7 +100,8 @@ sub ask_okcancel {
     my ($o, $title, $message, $def, $help) = @_;
 
     if ($::isWizard) {
-    	$o->ask_from_entries_refH({ title => $title, messages => $message, focus_cancel => !$def });
+	$::no_separator = 1;
+    	$o->ask_from_entries_refH_powered_no_check({ title => $title, messages => $message, focus_cancel => !$def });
     } else {
 	ask_from_list_($o, $title, $message, [ __("Ok"), __("Cancel") ], $def ? "Ok" : "Cancel", $help) eq "Ok";
     }
-- 
cgit v1.2.1