diff options
Diffstat (limited to 'urpm/install.pm')
| -rw-r--r-- | urpm/install.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/urpm/install.pm b/urpm/install.pm index 86d789fd..7598d6fe 100644 --- a/urpm/install.pm +++ b/urpm/install.pm @@ -227,12 +227,14 @@ sub install { $options{callback_open} = sub { my ($_data, $_type, $id) = @_; $index++; + $options{callback_open_helper} and $options{callback_open_helper}->(@_); $fh = urpm::sys::open_safe($urpm, '<', $install->{$id} || $upgrade->{$id}); $fh ? fileno $fh : undef; }; $options{callback_close} = sub { my ($urpm, undef, $pkgid) = @_; return unless defined $pkgid; + $options{callback_close_helper} and $options{callback_close_helper}->(@_); get_README_files($urpm, $trans, $urpm->{depslist}[$pkgid]); close $fh if defined $fh; }; |