diff options
author | Francois Pons <fpons@mandriva.com> | 2000-11-28 15:16:24 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2000-11-28 15:16:24 +0000 |
commit | 47b674be6e42d8d51c5c34408f973872812cdf3c (patch) | |
tree | 8b91761e576f9c4fdb5ba56b516a85aae1c9efd7 /perl-install | |
parent | aea1a43fb77b8b4c7cf9cc137b2629dd680666ed (diff) | |
download | drakx-47b674be6e42d8d51c5c34408f973872812cdf3c.tar drakx-47b674be6e42d8d51c5c34408f973872812cdf3c.tar.gz drakx-47b674be6e42d8d51c5c34408f973872812cdf3c.tar.bz2 drakx-47b674be6e42d8d51c5c34408f973872812cdf3c.tar.xz drakx-47b674be6e42d8d51c5c34408f973872812cdf3c.zip |
removed some more logs.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_any.pm | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 6402aa4da..7a91dcd1c 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -118,7 +118,6 @@ sub errorOpeningFile($) { sub getFile { my ($f, $method) = @_; my $rel = relGetFile($f); - log::l("getFile $f ($method) relGetFile $rel"); do { if ($method =~ /crypto/i) { require crypto; @@ -141,7 +140,6 @@ sub getFile { } sub getAndSaveFile { my ($file, $local) = @_; - log::l("getAndSaveFile $file $local"); local *F; open F, ">$local" or return; local $/ = \ (16 * 1024); my $f = ref($file) ? $file : getFile($file) or return; |