diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2007-07-02 14:38:39 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2007-07-02 14:38:39 +0000 |
| commit | 2100153f79187c0e05e45b0577535abae8571aa5 (patch) | |
| tree | 86294c2028e489623604f7cafa3c45bbd0cac42e /URPM | |
| parent | 7ef545fc95cb19dde4309fc2d73046b819899166 (diff) | |
| download | perl-URPM-2100153f79187c0e05e45b0577535abae8571aa5.tar perl-URPM-2100153f79187c0e05e45b0577535abae8571aa5.tar.gz perl-URPM-2100153f79187c0e05e45b0577535abae8571aa5.tar.bz2 perl-URPM-2100153f79187c0e05e45b0577535abae8571aa5.tar.xz perl-URPM-2100153f79187c0e05e45b0577535abae8571aa5.zip | |
help debugging the strange behaviour of this code
Diffstat (limited to 'URPM')
| -rw-r--r-- | URPM/Resolve.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 3b6ede7..131b6fc 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -1079,7 +1079,10 @@ sub _request_packages_to_upgrade_1 { $pn eq $n or next; if (ranges_overlap("< $evr", "== $pevr")) { #- this package looks like too old ? - $provides{$n}->name ne $pkg->name and $skip{$provides{$n}->name} = undef; + if ($provides{$n}->name ne $pkg->name) { + $urpm->{debug_URPM}("skipping " . $provides{$n}->fullname . " since " . $pkg->fullname . " provides a more recent version of $n ($evr vs $pevr)") if $urpm->{debug_URPM}; + $skip{$provides{$n}->name} = undef; + } $provides{$n} = $pkg; } last; |