From 8c6dcf8a897443cbd4256b043852a6b8599ad852 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Tue, 20 Mar 2001 17:36:05 +0000
Subject: no wizard if warning

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

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

diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 245e6fdae..f82c2604e 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -91,6 +91,7 @@ sub exit { exit($_[0]) }
 #-######################################################################################
 sub ask_warn {
     my ($o, $title, $message) = @_;
+    local $::isWizard=0;
     ask_from_listf_no_check($o, $title, $message, undef, [ _("Ok") ]);
 }
 
-- 
cgit v1.2.1