diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-09-07 03:25:32 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-09-12 23:11:58 +0200 |
commit | e0c350ab20e16e3de0c8bb00e930a0c974db33a3 (patch) | |
tree | dce90e2cea4e971c20832a47b4b9d96a34ba723d | |
parent | 31a29814bb63c98954fbe598d0e518d92f7d61e7 (diff) | |
download | perl-URPM-e0c350ab20e16e3de0c8bb00e930a0c974db33a3.tar perl-URPM-e0c350ab20e16e3de0c8bb00e930a0c974db33a3.tar.gz perl-URPM-e0c350ab20e16e3de0c8bb00e930a0c974db33a3.tar.bz2 perl-URPM-e0c350ab20e16e3de0c8bb00e930a0c974db33a3.tar.xz perl-URPM-e0c350ab20e16e3de0c8bb00e930a0c974db33a3.zip |
s/suggested/recommended/
-rw-r--r-- | URPM/Resolve.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 0717126..6a4834a 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -1105,7 +1105,7 @@ sub resolve_requested { =item resolve_requested_recommends($urpm, $db, $state, $selected, %options) -Select newly suggested package is installed as if (hard) required. +Select newly recommended package is installed as if (hard) required. =cut @@ -1117,7 +1117,7 @@ sub resolve_requested_recommends { my $pkg = shift @todo; my %recommends = map { $_ => 1 } $pkg->recommends_nosense or next; - #- do not install a package that has already been suggested + #- do not install a package that has already been recommended $db->traverse_tag_find('name', $pkg->name, sub { my ($p) = @_; delete $recommends{$_} foreach $p->recommends_nosense; @@ -1133,7 +1133,7 @@ sub resolve_requested_recommends { %recommends or next; - $urpm->{debug_URPM}("requested " . join(', ', keys %recommends) . " suggested by " . $pkg->fullname) if $urpm->{debug_URPM}; + $urpm->{debug_URPM}("requested " . join(', ', keys %recommends) . " recommended by " . $pkg->fullname) if $urpm->{debug_URPM}; my %new_requested = map { $_ => undef } keys %recommends; my @new_selected = resolve_requested__no_recommends_($urpm, $db, $state, \%new_requested, %options); |