From 948a8014086f8370e47439947122644c64578d65 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sat, 16 Feb 2002 18:59:30 +0000
Subject: do not trash error messages if testing

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

diff --git a/perl-install/interactive_newt.pm b/perl-install/interactive_newt.pm
index abdb09503..b5b167fb3 100644
--- a/perl-install/interactive_newt.pm
+++ b/perl-install/interactive_newt.pm
@@ -19,7 +19,7 @@ sub new() {
     Newt::Cls;
     Newt::SetSuspendCallback;
     ($width, $height) = Newt::GetScreenSize;
-    open STDERR,">/dev/null" if $::isStandalone;
+    open STDERR,">/dev/null" if $::isStandalone && !$::testing;
     bless {}, $_[0];
 }
 
-- 
cgit v1.2.1