From 4502635fa98a704e20aa142648c66704e0f796fa Mon Sep 17 00:00:00 2001 From: "mkanat%bugzilla.org" Date: Wed, 10 Nov 2010 23:46:49 +0000 Subject: [PATCH] Bug 611129: Quicksearch fails in 3.6.3 if List::MoreUtils is not installed r/a=mkanat git-svn-id: svn://10.0.0.236/branches/BUGZILLA-3_6-BRANCH@261547 18797224-902f-48f8-a5cc-f745e15eee43 --- mozilla/webtools/bugzilla/.bzrrev | 2 +- mozilla/webtools/bugzilla/Bugzilla/Search/Quicksearch.pm | 5 ++--- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/mozilla/webtools/bugzilla/.bzrrev b/mozilla/webtools/bugzilla/.bzrrev index 3b3aa077b26..0f72eb279bf 100644 --- a/mozilla/webtools/bugzilla/.bzrrev +++ b/mozilla/webtools/bugzilla/.bzrrev @@ -1 +1 @@ -7205 \ No newline at end of file +7206 \ No newline at end of file diff --git a/mozilla/webtools/bugzilla/Bugzilla/Search/Quicksearch.pm b/mozilla/webtools/bugzilla/Bugzilla/Search/Quicksearch.pm index f77bf6dedf8..6ffc63b65b9 100644 --- a/mozilla/webtools/bugzilla/Bugzilla/Search/Quicksearch.pm +++ b/mozilla/webtools/bugzilla/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) {