summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-02-13 17:05:07 +0000
committerThierry Vignaud <tv@mandriva.org>2009-02-13 17:05:07 +0000
commit4322ca1da805315413ce1f47efe1280300c5cceb (patch)
tree25221a6d7a30fc60c2db5d6022aa1cff43cc5ef6 /perl-install
parent5b848dcd0c79ce820b9c10003d5ed50f032cd779 (diff)
downloaddrakx-4322ca1da805315413ce1f47efe1280300c5cceb.tar
drakx-4322ca1da805315413ce1f47efe1280300c5cceb.tar.gz
drakx-4322ca1da805315413ce1f47efe1280300c5cceb.tar.bz2
drakx-4322ca1da805315413ce1f47efe1280300c5cceb.tar.xz
drakx-4322ca1da805315413ce1f47efe1280300c5cceb.zip
(cp_with_progress) perl_checker fix
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index b484248ee..8c33e6231 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -415,7 +415,7 @@ sub count_files {
sub cp_with_progress {
my $wait_message = shift;
- my $current = shift;
+ my $_current = shift;
my $total = shift;
my $dest = pop @_;
cp_with_progress_({ keep_special => 1 }, $wait_message, $total, \@_, $dest);