diff options
| author | Francois Pons <fpons@mandriva.com> | 2003-07-04 12:18:56 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2003-07-04 12:18:56 +0000 |
| commit | d1929249644079544e9ff985746d13125893c5a3 (patch) | |
| tree | ddc549735c4ff39c41108d7d06d139fc93e36e44 /URPM | |
| parent | b720bc2949d32028cebe52bea9cea3f34a52fbde (diff) | |
| download | perl-URPM-d1929249644079544e9ff985746d13125893c5a3.tar perl-URPM-d1929249644079544e9ff985746d13125893c5a3.tar.gz perl-URPM-d1929249644079544e9ff985746d13125893c5a3.tar.bz2 perl-URPM-d1929249644079544e9ff985746d13125893c5a3.tar.xz perl-URPM-d1929249644079544e9ff985746d13125893c5a3.zip | |
0.91-8mdk
Diffstat (limited to 'URPM')
| -rw-r--r-- | URPM/Resolve.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 33ab551..fb7f8b8 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -512,16 +512,16 @@ sub resolve_requested { foreach my $n (keys %diff_provides) { $db->traverse_tag('whatrequires', [ $n ], sub { my ($p) = @_; - if (my @l = $urpm->unsatisfied_requires($db, $state, $p, nopromoteepoch => 1)) { + if (my @l = $urpm->unsatisfied_requires($db, $state, $p, nopromoteepoch => 0)) { #- try if upgrading the package will be satisfying all the requires #- else it will be necessary to ask the user for removing it. my $packages = $urpm->find_candidate_packages($p->name, - nopromoteepoch => 1, + nopromoteepoch => 0, avoided => $state->{rejected}); my $best = join '|', map { $_->id } grep { $_->fullname ne $p->fullname && $urpm->unsatisfied_requires($db, $state, $_, - nopromoteepoch => 1, + nopromoteepoch => 0, name => $n) == 0 } @{$packages->{$p->name}}; @@ -533,7 +533,7 @@ sub resolve_requested { my @best; foreach (@l) { $packages = $urpm->find_candidate_packages($_, - nopromoteepoch => 1, + nopromoteepoch => 0, avoided => $state->{rejected}); $best = join('|', map { $_->id } |