diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-08-27 16:16:11 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-09-12 23:11:58 +0200 |
| commit | b8bbd4d92901dec029f564cb8744e04370e01330 (patch) | |
| tree | 5b6b2e4d8a97c62f2bd40be33df973e8a332a322 /URPM | |
| parent | 47f12646b34ad10fca581e8946ade89f18765483 (diff) | |
| download | perl-URPM-b8bbd4d92901dec029f564cb8744e04370e01330.tar perl-URPM-b8bbd4d92901dec029f564cb8744e04370e01330.tar.gz perl-URPM-b8bbd4d92901dec029f564cb8744e04370e01330.tar.bz2 perl-URPM-b8bbd4d92901dec029f564cb8744e04370e01330.tar.xz perl-URPM-b8bbd4d92901dec029f564cb8744e04370e01330.zip | |
rename "suggests" method as "recommends_nosense"
in order to reflect reality
but keep a suggests alias for compatibility for the time being
Diffstat (limited to 'URPM')
| -rw-r--r-- | URPM/Resolve.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 690d7c5..0a8e3ed 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -1114,12 +1114,12 @@ sub resolve_requested_suggests { my @todo = @$selected; while (@todo) { my $pkg = shift @todo; - my %suggests = map { $_ => 1 } $pkg->suggests or next; + my %suggests = map { $_ => 1 } $pkg->recommends_nosense or next; #- do not install a package that has already been suggested $db->traverse_tag_find('name', $pkg->name, sub { my ($p) = @_; - delete $suggests{$_} foreach $p->suggests; + delete $suggests{$_} foreach $p->recommends_nosense; }); # workaround: if you do "urpmi virtual_pkg" and one virtual_pkg is already installed, |