more adjusting of the cql qualifier logic
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Sat, 1 Mar 2008 16:36:54 +0000 (16:36 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Sat, 1 Mar 2008 16:36:54 +0000 (16:36 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@8847 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm

index 8c8bfae..b160c04 100644 (file)
@@ -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';
             }