diff options
author | Thierry Vignaud <tv@mandriva.org> | 2009-04-08 12:02:23 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2009-04-08 12:02:23 +0000 |
commit | 3504b33ada09708140a98e1f0bc15d1c4c31f9a6 (patch) | |
tree | 72b251d3f3a49adcd22c44cfba0107c5661d8286 /perl-install | |
parent | 51ceb10514e3a4bdfb315f5cdf18f9c59b68ea3e (diff) | |
download | drakx-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.pm | 3 |
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; |