Bug 70907: QuickSearch: port the JS code to perl (make it server-side) - Patch by Marc Schumann <wurblzap@gmail.com> r=wicked a=myk

1 files changed, 10 insertions, 0 deletions

diff --git a/buglist.cgi b/buglist.cgi
index 904df703d..63ab55951 100755
--- a/buglist.cgi
+++ b/buglist.cgi
@@ -38,6 +38,7 @@ use vars qw($template $vars);
 
 use Bugzilla;
 use Bugzilla::Search;
+use Bugzilla::Search::Quicksearch;
 use Bugzilla::Constants;
 use Bugzilla::User;
 
@@ -65,6 +66,15 @@ if (length($buffer) == 0) {
     ThrowUserError("buglist_parameters_required");
 }
 
+# Determine whether this is a quicksearch query.
+my $searchstring = $cgi->param('quicksearch');
+if (defined($searchstring)) {
+    $buffer = quicksearch($searchstring);
+    # Quicksearch may do a redirect, in which case it does not return.
+    # If it does return, it has modified $cgi->params so we can use them here
+    # as if this had been a normal query from the beginning.
+}
+
 ################################################################################
 # Data and Security Validation
 ################################################################################