diff options
author | Thierry Vignaud <tv@mandriva.org> | 2009-02-13 17:05:07 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2009-02-13 17:05:07 +0000 |
commit | 4322ca1da805315413ce1f47efe1280300c5cceb (patch) | |
tree | 25221a6d7a30fc60c2db5d6022aa1cff43cc5ef6 /perl-install/install | |
parent | 5b848dcd0c79ce820b9c10003d5ed50f032cd779 (diff) | |
download | drakx-backup-do-not-use-4322ca1da805315413ce1f47efe1280300c5cceb.tar drakx-backup-do-not-use-4322ca1da805315413ce1f47efe1280300c5cceb.tar.gz drakx-backup-do-not-use-4322ca1da805315413ce1f47efe1280300c5cceb.tar.bz2 drakx-backup-do-not-use-4322ca1da805315413ce1f47efe1280300c5cceb.tar.xz drakx-backup-do-not-use-4322ca1da805315413ce1f47efe1280300c5cceb.zip |
(cp_with_progress) perl_checker fix
Diffstat (limited to 'perl-install/install')
-rw-r--r-- | perl-install/install/any.pm | 2 |
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); |