(* Get the query, if it exists. *)
let query = try q#param "q" with Not_found -> "" in
let have_query = not (string_is_whitespace query) in
(* Get the query, if it exists. *)
let query = try q#param "q" with Not_found -> "" in
let have_query = not (string_is_whitespace query) in