summaryrefslogtreecommitdiffstats
path: root/perl-install/install/pkgs.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-03-09 18:05:27 +0000
committerThierry Vignaud <tv@mandriva.org>2009-03-09 18:05:27 +0000
commit08837240e8063a5cee53867f165a479423b3b732 (patch)
tree8dc2856ddd7be0ce178973cad897e0945487d01c /perl-install/install/pkgs.pm
parent52564bd15230e67a3cb300f06507fc4578864c03 (diff)
downloaddrakx-08837240e8063a5cee53867f165a479423b3b732.tar
drakx-08837240e8063a5cee53867f165a479423b3b732.tar.gz
drakx-08837240e8063a5cee53867f165a479423b3b732.tar.bz2
drakx-08837240e8063a5cee53867f165a479423b3b732.tar.xz
drakx-08837240e8063a5cee53867f165a479423b3b732.zip
(_install_raw) use new urpmi API in order to fix detecting whether installing
packages succedded or not (especially usefull for building ones)
Diffstat (limited to 'perl-install/install/pkgs.pm')
-rw-r--r--perl-install/install/pkgs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm
index 87b1b88ad..f85a5f571 100644
--- a/perl-install/install/pkgs.pm
+++ b/perl-install/install/pkgs.pm
@@ -733,7 +733,7 @@ sub _install_raw {
my $exit_code = urpm::main_loop::run($packages, $packages->{state}, undef, undef, undef, {
open_helper => $callback,
close_helper => sub {
- my ($packages, $_type, $id) = @_;
+ my ($db, $packages, $_type, $id) = @_;
&$callback;
my $pkg = defined $id && $packages->{depslist}[$id] or return;
my $check_installed;