From 33280055c72fd53c4f85db213d7415ca0a064a7e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 23 Aug 1999 21:01:21 +0000
Subject: no_comment

---
 perl-install/common.pm | 2 --
 1 file changed, 2 deletions(-)

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

diff --git a/perl-install/common.pm b/perl-install/common.pm
index 90b02b82a..ca6d9840d 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -78,7 +78,6 @@ sub fold_left(&$@) {
 sub add_f4before_leaving {
     my ($f, $b, $name) = @_;
 
-#    print "add_f4before_leaving\n";
     unless ($common::before_leaving::{$name}) {
 	no strict 'refs';
 	${"common::before_leaving::$name"} = 1;
@@ -114,7 +113,6 @@ sub catch_cdie(&&) {
 sub cdie {
     $@ = join '', @_;
     foreach (@common::cdie_catches) {
-	print;
 	&{$_}(@_) and return;
     }
     die @_;
-- 
cgit v1.2.1