[open-ils-commits] [GIT] Evergreen ILS branch rel_2_1 updated. d499871c02b00ced5268f1057db2d7ff96ad4905

[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, rel_2_1 has been updated
       via  d499871c02b00ced5268f1057db2d7ff96ad4905 (commit)
      from  fdc67bbc2de0a8261fd14c8b8b03cd61703dd47f (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 d499871c02b00ced5268f1057db2d7ff96ad4905
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 d3a6ae8..76b3a00 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/SuperCat.pm
@@ -1912,6 +1912,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