aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-08-02 09:01:22 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-08-02 09:01:22 +0000
commitb90662c8d19628eed8cb912ddda2d536d0af4b61 (patch)
tree2a8f7f5ac7b4be6866c758c42e845e16b75b623e
parent5ac4d0ce7033d7e72fe745a4cb37783605a2201e (diff)
downloadperl-URPM-b90662c8d19628eed8cb912ddda2d536d0af4b61.tar
perl-URPM-b90662c8d19628eed8cb912ddda2d536d0af4b61.tar.gz
perl-URPM-b90662c8d19628eed8cb912ddda2d536d0af4b61.tar.bz2
perl-URPM-b90662c8d19628eed8cb912ddda2d536d0af4b61.tar.xz
perl-URPM-b90662c8d19628eed8cb912ddda2d536d0af4b61.zip
Protection against packages that obsolete themselves.
-rw-r--r--URPM/Resolve.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index b222aca..88d655b 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -499,6 +499,7 @@ sub resolve_requested {
my (%diff_provides);
foreach ($pkg->name." < ".$pkg->epoch.":".$pkg->version."-".$pkg->release, $pkg->obsoletes) {
+ $pkg->name eq $_ and next; #- this package obsoletes itself ?? Ignore.
if (my ($n, $o, $v) = /^([^\s\[]*)(?:\[\*\])?\s*\[?([^\s\]]*)\s*([^\s\]]*)/) {
#- populate avoided entries according to what is selected.
foreach (keys %{$urpm->{provides}{$n} || {}}) {