summaryrefslogtreecommitdiffstats
path: root/urpm/install.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-04-14 16:51:48 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-04-14 18:12:53 +0200
commit32c4bc874e3f7fc99188bf045902b1018f38855a (patch)
tree8aa3f1f37c65dddcd61fa33ef9e7f22c4bdc8926 /urpm/install.pm
parentf70a133918179fe01c205720687f16bb9bdc5652 (diff)
downloadurpmi-32c4bc874e3f7fc99188bf045902b1018f38855a.tar
urpmi-32c4bc874e3f7fc99188bf045902b1018f38855a.tar.gz
urpmi-32c4bc874e3f7fc99188bf045902b1018f38855a.tar.bz2
urpmi-32c4bc874e3f7fc99188bf045902b1018f38855a.tar.xz
urpmi-32c4bc874e3f7fc99188bf045902b1018f38855a.zip
use new "elem" callback
need URPM >= 5.07
Diffstat (limited to 'urpm/install.pm')
-rw-r--r--urpm/install.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/urpm/install.pm b/urpm/install.pm
index 6f88e494..7c32fa0a 100644
--- a/urpm/install.pm
+++ b/urpm/install.pm
@@ -120,7 +120,6 @@ sub install_logger {
++$urpm->{logger_count} if $pname;
$cnt = $pname ? $urpm->{logger_count} : '-';
}
- $index++;
my $s = sprintf("%9s: %-22s", $cnt . "/" . $total_pkg, $pname);
print $s;
$s =~ / $/ or printf "\n%9s %-22s", '', '';
@@ -300,6 +299,10 @@ sub _get_callbacks {
$options->{callback_uninst} ||= $options->{verbose} >= 0 ? \&install_logger : $erase_logger;
+ $options->{callback_elem} ||= sub {
+ my (undef, undef, undef, undef, $idx, undef) = @_;
+ $index = $idx;
+ };
$options->{callback_error} ||= sub {
my ($urpm, undef, $id, $subtype, undef, undef, $fullname) = @_;
$urpm->{error}("ERROR: '$subtype' failed for $fullname");