From c2291d42ccff39452769c2c5d1e62842765dcf7b Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 17 Mar 2000 18:28:37 +0000
Subject: *** empty log message ***

---
 perl-install/common.pm | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

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

diff --git a/perl-install/common.pm b/perl-install/common.pm
index 0e75369ce..777038e2e 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -367,11 +367,7 @@ sub template2file($$%) {
     local *OUT; local *IN;
 
     open IN, $inputfile  or die "Can't open $inputfile $!";
-    if ($::testing) {
-	*OUT = *STDOUT;
-    } else {
-	open OUT, ">$outputfile" or die "Can't open $outputfile $!";
-    }
+    open OUT, ">$outputfile" or die "Can't open $outputfile $!";
 
     map { s/@@@(.*?)@@@/$toreplace{$1}/g; print OUT; } <IN>;
 }
-- 
cgit v1.2.1