diff options
| -rwxr-xr-x | rpmdrake | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -272,7 +272,7 @@ sub do_search($$$$$$$) { if ($current_search_type ne 'normal') { if ($MODE eq 'remove') { if ($current_search_type eq 'descriptions') { - @search_results = map { if_(eval { ($pkgs->{$_}{summary}.$pkgs->{$_}{description}) =~ /$entry/i }, $_) } keys %$pkgs; + @search_results = grep { eval { ($pkgs->{$_}{summary}.$pkgs->{$_}{description}) =~ /$entry/i } } keys %$pkgs; } else { slow_func(N("Please wait, searching..."), sub { db->traverse(sub { push @search_results, map { if_(eval { /$entry/i }, my_fullname($_[0])) } $_[0]->files }); @@ -364,7 +364,7 @@ sub run_treeview_dialog { my $formatlistpkg = sub { myformatList(sort { uc($a) cmp uc($b) } @_) }; my $is_locale_available = sub { - grep { $urpm->{depslist}[$_]->flag_selected } keys %{$urpm->{provides}{$_[0]} || {}} and return 1; + any { $urpm->{depslist}[$_]->flag_selected } keys %{$urpm->{provides}{$_[0]} || {}} and return 1; my $found; db->traverse_tag('name', [ $_ ], sub { $found ||= 1 }); return $found; |