summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-04-08 12:02:23 +0000
committerThierry Vignaud <tv@mandriva.org>2009-04-08 12:02:23 +0000
commit3504b33ada09708140a98e1f0bc15d1c4c31f9a6 (patch)
tree72b251d3f3a49adcd22c44cfba0107c5661d8286 /perl-install
parent51ceb10514e3a4bdfb315f5cdf18f9c59b68ea3e (diff)
downloaddrakx-3504b33ada09708140a98e1f0bc15d1c4c31f9a6.tar
drakx-3504b33ada09708140a98e1f0bc15d1c4c31f9a6.tar.gz
drakx-3504b33ada09708140a98e1f0bc15d1c4c31f9a6.tar.bz2
drakx-3504b33ada09708140a98e1f0bc15d1c4c31f9a6.tar.xz
drakx-3504b33ada09708140a98e1f0bc15d1c4c31f9a6.zip
(get_file_and_size) cleanup
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/http.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install/http.pm b/perl-install/install/http.pm
index a0c6b8175..91b27601c 100644
--- a/perl-install/install/http.pm
+++ b/perl-install/install/http.pm
@@ -51,9 +51,8 @@ sub get_file_and_size {
my $res = urpm::download::sync_url($urpm, $url, dir => $cachedir);
$res or die N("retrieval of [%s] failed", $file) . "\n";
- log::l("using $file (" . -s $file . ")");
open(my $f, $file);
- +( -s $file, $f);
+ ( -s $file, $f);
}
1;