From ee88006a37dcc52504252ca91ef1789a509e1e20 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Thu, 23 Nov 2000 18:18:08 +0000
Subject: removed some ugly logs.

---
 perl-install/install_any.pm | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index cc1305627..6402aa4da 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -122,14 +122,12 @@ sub getFile {
     do {
 	if ($method =~ /crypto/i) {
 	    require crypto;
-	    log::l("crypto::getFile $f");
 	    crypto::getFile($f);
 	} elsif ($::o->{method} eq "ftp") {
 	    require ftp;
 	    ftp::getFile($rel);
 	} elsif ($::o->{method} eq "http") {
 	    require http;
-	    log::l("http getFile $f");
 	    http::getFile($rel);
 	} else {
 	    #- try to open the file, but examine if it is present in the repository, this allow
@@ -137,7 +135,6 @@ sub getFile {
 	    #- to other to avoid media change...
 	    my $f2 = "$postinstall_rpms/$f";
 	    $f2 = "/tmp/rhimage/$rel" unless $postinstall_rpms && -e $f2;
-	    log::l("local getFile $f2");
 	    open GETFILE, $f2 and *GETFILE;
 	}
     } || errorOpeningFile($f);
-- 
cgit v1.2.1