summaryrefslogtreecommitdiffstats
path: root/urpm/orphans.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2014-09-05 16:20:27 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2014-09-07 05:20:18 +0200
commitedbaba2d5dfc7673d4b543d2000fa4a6dbffef10 (patch)
tree514eca804e28e201d6f9764ff39ca4f996803756 /urpm/orphans.pm
parentd7d4a6f538362365ead3ac4fa2fa4aa2cfc6773c (diff)
downloadurpmi-edbaba2d5dfc7673d4b543d2000fa4a6dbffef10.tar
urpmi-edbaba2d5dfc7673d4b543d2000fa4a6dbffef10.tar.gz
urpmi-edbaba2d5dfc7673d4b543d2000fa4a6dbffef10.tar.bz2
urpmi-edbaba2d5dfc7673d4b543d2000fa4a6dbffef10.tar.xz
urpmi-edbaba2d5dfc7673d4b543d2000fa4a6dbffef10.zip
use ->recommends_nosense() instead of suggests"()
this is the new method name (even if compatibility still works). needs a new URPM.
Diffstat (limited to 'urpm/orphans.pm')
-rw-r--r--urpm/orphans.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/urpm/orphans.pm b/urpm/orphans.pm
index 9db0c1ef..5999de61 100644
--- a/urpm/orphans.pm
+++ b/urpm/orphans.pm
@@ -255,7 +255,7 @@ sub _unrequested_orphans_after_remove_once {
$db->traverse_tag('name', [ $n ], sub {
my ($p) = @_;
$p->fullname eq $fn or return;
- push @requires, $p->requires, $p->suggests;
+ push @requires, $p->requires, $p->recommends_nosense;
});
}
@@ -420,7 +420,7 @@ sub _all_unrequested_orphans {
while (my $pkg = shift @$req) {
# do not do anything regarding kernels if we failed to detect the running one (ie: chroot)
_kernel_callback($pkg, $unreq_list) if $current_kernel;
- foreach my $prop ($pkg->requires, $pkg->suggests) {
+ foreach my $prop ($pkg->requires, $pkg->recommends_nosense) {
my $n = URPM::property2name($prop);
foreach my $p (@{$provides{$n} || []}) {
if ($p != $pkg && $l{$p->name} && $p->provides_overlap($prop)) {
@@ -577,7 +577,7 @@ sub installed_leaves {
}
foreach my $pkg (@$packages) {
- foreach my $prop ($pkg->requires, $pkg->suggests) {
+ foreach my $prop ($pkg->requires, $pkg->recommends_nosense) {
my $n = URPM::property2name($prop);
foreach my $p (@{$provides{$n} || []}) {
$p != $pkg && $p->provides_overlap($prop) and