From 938260d5901f0292532b64d2f5eec09607bf6aaf Mon Sep 17 00:00:00 2001 From: miker Date: Sat, 1 Mar 2008 16:36:54 +0000 Subject: [PATCH] more adjusting of the cql qualifier logic git-svn-id: svn://svn.open-ils.org/ILS/trunk@8847 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm index 8c8bfaef37..b160c04b24 100644 --- a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm @@ -1334,7 +1334,7 @@ sub sru_search { 'open-ils.search.biblio.multiclass.query' => {} => $search_string )->gather(1); - $recs = $supercat->request( 'open-ils.supercat.record.object.retrieve' => $recs->{ids} ); + $recs = $supercat->request( 'open-ils.supercat.record.object.retrieve' => $recs->{ids} )->gather(1); $resp->addRecord( SRU::Response::Record->new( @@ -1452,7 +1452,7 @@ sub sru_search { if ( $qualifier ) { if ( exists($qualifier_map{lc($qualifier)}) ) { - $qualifier = 'kw' unless ( defined($qualifier_map{lc($qualifier)}) ); + $qualifier = $qualifier_map{lc($qualifier)} || 'kw'; } -- 2.11.0