diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-09-26 19:12:33 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-09-26 19:12:33 +0000 |
commit | d4848db669d74915dd7a1cbd8b98168cc0445dc5 (patch) | |
tree | 383b4f8c2d87bd0c29598e0fa093df60fb72f0af | |
parent | e7bde1cab963c6c29901f31525c5522c2ef1cdc3 (diff) | |
download | urpmi-d4848db669d74915dd7a1cbd8b98168cc0445dc5.tar urpmi-d4848db669d74915dd7a1cbd8b98168cc0445dc5.tar.gz urpmi-d4848db669d74915dd7a1cbd8b98168cc0445dc5.tar.bz2 urpmi-d4848db669d74915dd7a1cbd8b98168cc0445dc5.tar.xz urpmi-d4848db669d74915dd7a1cbd8b98168cc0445dc5.zip |
use any instead of grep
-rwxr-xr-x | urpmq | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -350,7 +350,7 @@ if ($options{list_aliases}) { foreach (map { $urpm->{depslist}[$_] } grep { ! exists $state->{selected}{$_} && ! exists $properties{$_} } keys %{$requires{$n} || {}}) { - if (grep { URPM::ranges_overlap("$n $s", $_) } $_->requires) { + if (any { URPM::ranges_overlap("$n $s", $_) } $_->requires) { push @properties, $_->id; $urpm->{debug} and $urpm->{debug}(sprintf "adding package %s (requires %s%s)", $_->name, $pkg->name, $n eq $pkg->name ? '' : " via $n"); $properties{$_->id} = undef; |