From 5889ea4c58b0f47b240620610671e26ad02c5653 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Thu, 9 Apr 2009 09:55:41 -0500 Subject: [PATCH] bug 2958: fix search results navigation for CCL, CQL, and PQF queries The shortcut to build $query_cgi in C4::Search::buildQuery() for CCL, CQL, and PQF queries is incorrect, as (for now) the "q=" prefix is required. Signed-off-by: Galen Charlton --- C4/Search.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/C4/Search.pm b/C4/Search.pm index e965682a8f..0c14776528 100644 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -902,13 +902,13 @@ sub buildQuery { # for handling ccl, cql, pqf queries in diagnostic mode, skip the rest of the steps # DIAGNOSTIC ONLY!! if ( $query =~ /^ccl=/ ) { - return ( undef, $', $', $', $', '', '', '', '', 'ccl' ); + return ( undef, $', $', "q=ccl=$'", $', '', '', '', '', 'ccl' ); } if ( $query =~ /^cql=/ ) { - return ( undef, $', $', $', $', '', '', '', '', 'cql' ); + return ( undef, $', $', "q=cql=$'", $', '', '', '', '', 'cql' ); } if ( $query =~ /^pqf=/ ) { - return ( undef, $', $', $', $', '', '', '', '', 'pqf' ); + return ( undef, $', $', "q=pqf=$'", $', '', '', '', '', 'pqf' ); } # pass nested queries directly -- 2.39.5