From 0cebac054e759cbf80e25e6223dac9c8ae555fc3 Mon Sep 17 00:00:00 2001
From: Nicolas Vigier <nvigier@mandriva.com>
Date: Wed, 3 Oct 2007 17:28:29 +0000
Subject: fix #34371

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

diff --git a/perl-install/wizards.pm b/perl-install/wizards.pm
index 9a262a216..f682f819e 100644
--- a/perl-install/wizards.pm
+++ b/perl-install/wizards.pm
@@ -119,7 +119,7 @@ sub process {
         my ($res, $msg) = &{$o->{init}};
         if (!$res) {
             $in->ask_okcancel(N("Error"), $msg);
-            die "wizard failed" if !$::testing;
+            die "wizcancel" if !$::testing;
         }
     }
     
-- 
cgit v1.2.1