summaryrefslogtreecommitdiffstats
path: root/urpm/install.pm
diff options
context:
space:
mode:
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");