aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-09-13 09:59:57 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-09-13 09:59:57 +0000
commita4c8c2887b280d319c3f4ebcbf7317be6316806f (patch)
tree3dd184b543073ac9373269f8b1144b192b71e588
parent302490a03359ab67f2b8d746229c0042d0cc1495 (diff)
downloadperl-URPM-a4c8c2887b280d319c3f4ebcbf7317be6316806f.tar
perl-URPM-a4c8c2887b280d319c3f4ebcbf7317be6316806f.tar.gz
perl-URPM-a4c8c2887b280d319c3f4ebcbf7317be6316806f.tar.bz2
perl-URPM-a4c8c2887b280d319c3f4ebcbf7317be6316806f.tar.xz
perl-URPM-a4c8c2887b280d319c3f4ebcbf7317be6316806f.zip
create _compute_diff_provides_of_removed_pkg() out of _unselect_package_deprecated_by_property()
-rw-r--r--URPM/Resolve.pm9
1 files changed, 8 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index 8102a8f..143165c 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -950,6 +950,14 @@ sub _unselect_package_deprecated_by_property {
$obsoleted or ++$state->{oldpackage};
#- diff_provides on obsoleted provides are needed.
+ _compute_diff_provides_of_removed_pkg($urpm, $state, $diff_provides, $p);
+ });
+}
+
+#- side-effects: $diff_provides
+sub _compute_diff_provides_of_removed_pkg {
+ my ($urpm, $state, $diff_provides, $p) = @_;
+
foreach ($p->provides) {
#- check differential provides between obsoleted package and newer one.
my ($pn, $ps) = property2name_range($_) or next;
@@ -965,7 +973,6 @@ sub _unselect_package_deprecated_by_property {
}
}
}
- });
}
#- side-effects: $properties