diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-11-21 23:23:31 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-11-21 23:23:31 +0000 |
| commit | cc6cf3352215ba8287ff915fae554843c9de815b (patch) | |
| tree | 867bb94256552ce0e416108eb9f0197f3cfe9217 /urpm/parallel.pm | |
| parent | 689b9c5d05c3b29c9f6983a21ed55f512ba11b4d (diff) | |
| download | urpmi-cc6cf3352215ba8287ff915fae554843c9de815b.tar urpmi-cc6cf3352215ba8287ff915fae554843c9de815b.tar.gz urpmi-cc6cf3352215ba8287ff915fae554843c9de815b.tar.bz2 urpmi-cc6cf3352215ba8287ff915fae554843c9de815b.tar.xz urpmi-cc6cf3352215ba8287ff915fae554843c9de815b.zip | |
use "any" instead of "grep" in scalar context
Diffstat (limited to 'urpm/parallel.pm')
| -rw-r--r-- | urpm/parallel.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/urpm/parallel.pm b/urpm/parallel.pm index 6f55b841..f35843d3 100644 --- a/urpm/parallel.pm +++ b/urpm/parallel.pm @@ -178,7 +178,7 @@ sub _parse_urpmq_output { #- distant urpmq returned a choices, check if it has already been chosen #- or continue iteration to make sure no more choices are left. $$cont ||= 1; #- invalid transitory state (still choices is strange here if next sentence is not executed). - unless (grep { exists $chosen->{$_} } split /\|/, $s) { + unless (any { exists $chosen->{$_} } split /\|/, $s) { my $choice = $options{callback_choices}->($urpm, undef, $state, [ map { $urpm->search($_) } split /\|/, $s ]); if ($choice) { $chosen->{scalar $choice->fullname} = $choice; |