diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-01-06 19:43:44 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-01-06 19:43:44 +0000 |
commit | 1c44e4e5600ee7b981f6b5c8a0181e5323d50dbb (patch) | |
tree | c5be614f327a245cde0840d50b8fdfacf2d7529c /urpm/download.pm | |
parent | 1fd8be50f3a52993761b92ba90cdecc04825da37 (diff) | |
download | urpmi-1c44e4e5600ee7b981f6b5c8a0181e5323d50dbb.tar urpmi-1c44e4e5600ee7b981f6b5c8a0181e5323d50dbb.tar.gz urpmi-1c44e4e5600ee7b981f6b5c8a0181e5323d50dbb.tar.bz2 urpmi-1c44e4e5600ee7b981f6b5c8a0181e5323d50dbb.tar.xz urpmi-1c44e4e5600ee7b981f6b5c8a0181e5323d50dbb.zip |
perl_checker cleanups
Diffstat (limited to 'urpm/download.pm')
-rw-r--r-- | urpm/download.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/urpm/download.pm b/urpm/download.pm index bfe4139b..54aa963f 100644 --- a/urpm/download.pm +++ b/urpm/download.pm @@ -801,7 +801,7 @@ eval { }; sub progress_text { - my ($mode, $file, $percent, $total, $eta, $speed) = @_; + my ($mode, $_file, $percent, $total, $eta, $speed) = @_; $mode eq 'progress' ? (defined $total && defined $eta ? N(" %s%% of %s completed, ETA = %s, speed = %s", $percent, $total, $eta, $speed) : @@ -810,7 +810,7 @@ sub progress_text { #- default logger suitable for sync operation on STDERR only. sub sync_logger { - my ($mode, $file, $percent, $total, $eta, $speed) = @_; + my ($mode, $file, $percent, $_total, $_eta, $_speed) = @_; if ($mode eq 'start') { print STDERR " $file\n"; } elsif ($mode eq 'progress') { @@ -863,7 +863,7 @@ sub _all_options { dir => "$urpm->{cachedir}/partial", proxy => get_proxy_($urpm, $medium), metalink => $medium->{mirrorlist}, - $medium->{"disable-certificate-check"}?"no-certificate-check":(), + $medium->{"disable-certificate-check"} ? "no-certificate-check" : (), $urpm->{debug} ? (debug => $urpm->{debug}) : (), %$options, ); |