aboutsummaryrefslogtreecommitdiffstats
path: root/URPM/Resolve.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-02-13 17:53:08 +0000
committerFrancois Pons <fpons@mandriva.com>2003-02-13 17:53:08 +0000
commit62607899680c3585543c007dbb37edb0205a1e9a (patch)
treed7894e5bd5b5d2773ab09aa1301ee3f54be83c3f /URPM/Resolve.pm
parent16d9930415ab46e0b9101962ffce66f44f5fd794 (diff)
downloadperl-URPM-62607899680c3585543c007dbb37edb0205a1e9a.tar
perl-URPM-62607899680c3585543c007dbb37edb0205a1e9a.tar.gz
perl-URPM-62607899680c3585543c007dbb37edb0205a1e9a.tar.bz2
perl-URPM-62607899680c3585543c007dbb37edb0205a1e9a.tar.xz
perl-URPM-62607899680c3585543c007dbb37edb0205a1e9a.zip
fix rpmdrake woes on incompatible arch.
Diffstat (limited to 'URPM/Resolve.pm')
-rw-r--r--URPM/Resolve.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index 32a03f4..d2677ca 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -599,6 +599,7 @@ sub compute_installed_flags {
#- first pass to initialize flags installed and upgrade for all package.
foreach (@{$urpm->{depslist}}) {
+ $_->is_arch_compat or next;
$_->flag_upgrade || $_->flag_installed or $_->set_flag_upgrade;
}
@@ -610,7 +611,7 @@ sub compute_installed_flags {
#- compute flags.
foreach (keys %{$urpm->{provides}{$p->name} || {}}) {
my $pkg = $urpm->{depslist}[$_];
- $pkg->name eq $p->name or next;
+ $pkg->is_arch_compat && $pkg->name eq $p->name or next;
#- compute only installed and upgrade flags.
$pkg->set_flag_installed; #- there is at least one package installed (whatever its version).
$pkg->flag_upgrade and $pkg->set_flag_upgrade($pkg->compare_pkg($p) > 0);