diff options
author | 2010-11-11 00:42:59 +0100 | |
---|---|---|
committer | 2010-11-11 00:42:59 +0100 | |
commit | ae3cb23cc7ae91574687ffb7037fa68adc674241 (patch) | |
tree | 56c66b0368402de22341614f5f25b6b9f23b17da | |
parent | Bug 596611: Add a hook to email_in.pl (diff) | |
download | bugzilla-ae3cb23cc7ae91574687ffb7037fa68adc674241.tar.gz bugzilla-ae3cb23cc7ae91574687ffb7037fa68adc674241.tar.bz2 bugzilla-ae3cb23cc7ae91574687ffb7037fa68adc674241.zip |
Bug 611129: Quicksearch fails in 3.6.3 if List::MoreUtils is not installed
r/a=mkanat
-rw-r--r-- | Bugzilla/Search/Quicksearch.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Bugzilla/Search/Quicksearch.pm b/Bugzilla/Search/Quicksearch.pm index f77bf6ded..6ffc63b65 100644 --- a/Bugzilla/Search/Quicksearch.pm +++ b/Bugzilla/Search/Quicksearch.pm @@ -31,7 +31,6 @@ use Bugzilla::Field; use Bugzilla::Util; use List::Util qw(min max); -use List::MoreUtils qw(firstidx); use base qw(Exporter); @Bugzilla::Search::Quicksearch::EXPORT = qw(quicksearch); @@ -447,9 +446,9 @@ sub _special_field_syntax { my $legal_priorities = get_legal_field_values('priority'); # If Pn exists explicitly, use it. - my $start = firstidx { $_ eq "P$p_start" } @$legal_priorities; + my $start = lsearch($legal_priorities, "P$p_start"); my $end; - $end = firstidx { $_ eq "P$p_end" } @$legal_priorities if defined $p_end; + $end = lsearch($legal_priorities, "P$p_end") if defined $p_end; # If Pn doesn't exist explicitly, then we mean the nth priority. if ($start == -1) { |