diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2008-07-03 11:25:35 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2008-07-03 11:25:35 +0000 |
| commit | e5fdf9e289f02f44b163fd9a063b1e7f2880469a (patch) | |
| tree | 9d0219c0b67f98a63cb9d71013bd2b038ea1aabd | |
| parent | 3463a2d5b510f37b9ebe22a30e3b906b2922398c (diff) | |
| download | perl-URPM-e5fdf9e289f02f44b163fd9a063b1e7f2880469a.tar perl-URPM-e5fdf9e289f02f44b163fd9a063b1e7f2880469a.tar.gz perl-URPM-e5fdf9e289f02f44b163fd9a063b1e7f2880469a.tar.bz2 perl-URPM-e5fdf9e289f02f44b163fd9a063b1e7f2880469a.tar.xz perl-URPM-e5fdf9e289f02f44b163fd9a063b1e7f2880469a.zip | |
perl_checker compliance
| -rw-r--r-- | URPM/Resolve.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index d62df93..ecc27fb 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -449,7 +449,7 @@ sub unsatisfied_requires { if (my ($pn, $ps) = property2name_range($_)) { $ps or $state->{cached_installed}{$pn}{$p->fullname} = undef; $pn eq $n or next; - ranges_overlap($ps, $s, 1) and ++$satisfied; + URPM::ranges_overlap($ps, $s, 1) and ++$satisfied; } } }); @@ -1127,11 +1127,11 @@ sub _find_packages_obsoleting { grep { !$_->flag_skip && $_->is_arch_compat - && !exists $state->{rejected}->{$_->fullname} + && !exists $state->{rejected}{$_->fullname} && $_->obsoletes_overlap($p->name . " == " . $p->epoch . ":" . $p->version . "-" . $p->release) && $_->fullname ne $p->fullname && (!strict_arch($urpm) || strict_arch_check($p, $_)); - } packages_obsoleting($urpm, $p->name); + } $urpm->packages_obsoleting($p->name); } #- side-effects: $properties |