diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2007-09-13 09:59:57 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2007-09-13 09:59:57 +0000 |
commit | a4c8c2887b280d319c3f4ebcbf7317be6316806f (patch) | |
tree | 3dd184b543073ac9373269f8b1144b192b71e588 | |
parent | 302490a03359ab67f2b8d746229c0042d0cc1495 (diff) | |
download | perl-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.pm | 9 |
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 |