[open-ils-commits] [GIT] Evergreen ILS branch master updated. 9c0d4beb484bb268c8ed8db0d4725d420305fdfc

[Evergreen Git]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Evergreen ILS".

The branch, master has been updated
       via  9c0d4beb484bb268c8ed8db0d4725d420305fdfc (commit)
      from  80e1c87653c01ccb67d011146c13fa02ed2f23d3 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 9c0d4beb484bb268c8ed8db0d4725d420305fdfc
Author: Dan Scott <dscott at laurentian.ca>
Date:   Sun Oct 16 12:45:52 2011 -0400

    LP875819: Fix SRU and Z39.50 default search index failures
    
    Per http://www.loc.gov/standards/sru/specs/cql.html :
    
    All parts of CQL are case insensitive [...] If any case insensitive
    part of CQL is specified with both upper and lower case, it is
    for aesthetic purposes only.
    
    So fold the SRU qualifier and relation to lower case. This then
    matches the srw.serverchoice entry that we already have in
    config.metabib_search_alias so that default searches will successfully
    point to the keyword index.
    
    Signed-off-by: Dan Scott <dscott at laurentian.ca>
    Signed-off-by: Lebbeous Fogle-Weekley <lebbeous at esilibrary.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm
index 708cc22..9a36347 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm
@@ -1954,6 +1954,15 @@ sub sru_search {
         if ( $qualifier ) {
             my ($qset, $qname) = split(/\./, $qualifier);
 
+            # Per http://www.loc.gov/standards/sru/specs/cql.html
+            # "All parts of CQL are case insensitive [...] If any case insensitive
+            # part of CQL is specified with both upper and lower case, it is for
+            # aesthetic purposes only."
+
+            # So fold the qualifier and relation to lower case
+            $qset = lc($qset);
+            $qname = lc($qname);
+
             if ( exists($qualifier_map{$qset}{$qname}) ) {
                 $qualifier = $qualifier_map{$qset}{$qname}{'index'} || 'kw';
                 $log->debug("SRU toEvergreen: $qset, $qname   $qualifier_map{$qset}{$qname}{'index'}\n");

-----------------------------------------------------------------------

Summary of changes:
 Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm |    9 +++++++++
 1 files changed, 9 insertions(+), 0 deletions(-)


hooks/post-receive
-- 
Evergreen ILS