From c9356742c50f326247fd018a5f5fc4b7c1324f64 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 Signed-off-by: Henri-Damien LAURENT --- C4/Search.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/C4/Search.pm b/C4/Search.pm index 5576ee8963..513a7f807c 100644 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -888,13 +888,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