diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2009-04-09 10:11:28 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2009-04-09 10:11:28 +0000 |
| commit | 34de898cec65e0744b462c9be568a77df52ef7fe (patch) | |
| tree | 24f7c32167f4ddf8b44dbc7560541d1ace27a9ce /perl-install/install | |
| parent | e012df5b1234a0c559a7c2b94b766a736632ca87 (diff) | |
| download | drakx-34de898cec65e0744b462c9be568a77df52ef7fe.tar drakx-34de898cec65e0744b462c9be568a77df52ef7fe.tar.gz drakx-34de898cec65e0744b462c9be568a77df52ef7fe.tar.bz2 drakx-34de898cec65e0744b462c9be568a77df52ef7fe.tar.xz drakx-34de898cec65e0744b462c9be568a77df52ef7fe.zip | |
perl_checker cleanups
Diffstat (limited to 'perl-install/install')
| -rw-r--r-- | perl-install/install/http.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/http.pm b/perl-install/install/http.pm index 72ff053fb..bca1f7362 100644 --- a/perl-install/install/http.pm +++ b/perl-install/install/http.pm @@ -39,7 +39,7 @@ sub get_file_and_size { my $urpm = $::o->{packages}; if (!$urpm) { require install::pkgs; - $urpm = install::pkgs::empty_packages($o->{keep_unrequested_dependencies}); + $urpm = install::pkgs::empty_packages($::o->{keep_unrequested_dependencies}); } my $cachedir = $urpm->{cachedir} || '/root'; @@ -57,7 +57,7 @@ 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"; open(my $f, $file); - ( -s $file, $f); + (-s $file, $f); } 1; |