Bug 9239 QA follow-up: remove stray debug code
authorJared Camins-Esakov <jcamins@cpbibliography.com>
Thu, 14 Mar 2013 14:11:16 +0000 (10:11 -0400)
committerJared Camins-Esakov <jcamins@cpbibliography.com>
Sun, 17 Mar 2013 01:32:34 +0000 (21:32 -0400)
Remove a line of debug code from EG, provide better error handling
when presented with weird data in the authority linker, and correct
queryparser configuration to reflect the correct configuration for
Zebra.

Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
C4/AuthoritiesMarc.pm
C4/Biblio.pm
Koha/QueryParser/Driver/PQF/query_plan/node.pm
OpenILS/QueryParser.pm
etc/searchengine/queryparser.yaml

index e30c571..5d66e48 100644 (file)
@@ -283,7 +283,7 @@ sub SearchAuthorities {
                 $dosearch=1;
                 ++$attr_cnt;
                 if ($QParser) {
-                    $qpquery .= " $tags->[$i]:$value->[$i]";
+                    $qpquery .= " $tags->[$i]:\"$value->[$i]\"";
                 }
             }#if value
         }
index d232fa6..16134d4 100644 (file)
@@ -667,7 +667,7 @@ sub _check_valid_auth_link {
     require C4::AuthoritiesMarc;
 
     my $authorized_heading =
-      C4::AuthoritiesMarc::GetAuthorizedHeading( { 'authid' => $authid } );
+      C4::AuthoritiesMarc::GetAuthorizedHeading( { 'authid' => $authid } ) || '';
 
    return ($field->as_string('abcdefghijklmnopqrstuvwxyz') eq $authorized_heading);
 }
index 6e0a605..3727e34 100644 (file)
@@ -34,7 +34,7 @@ sub target_syntax {
             if ($relbump) {
                 $fieldobj->{'attr_string'} .= ' ' . $relbump->{'attr_string'};
             }
-            push @fields, $fieldobj unless (!defined($fieldobj) || ($field eq $self->classname && scalar @fields));
+            push @fields, $fieldobj unless (!defined($fieldobj) || ($field eq $self->classname && @{$self->fields} > 1));
         }
     } else {
         $fieldobj = $self->plan->QueryParser->bib1_mapping_by_name('field', $self->classname, $self->classname, $server);
index e5aaf09..f0051f7 100644 (file)
@@ -1175,7 +1175,7 @@ sub decompose {
                 # Cleanup the phrase to make it so that we don't parse things in it as anything other than atoms
                 $phrase =~ s/$phrase_cleanup_re/ /g;
 
-                $_ = $phrase . $temp_val;
+                $_ = $temp_val;
 
             }
 
index f54ac3b..0cce85c 100644 (file)
@@ -1133,6 +1133,9 @@ field_mappings:
       bib1_mapping:
         authorityserver:
           1: Match-heading
+          4: 1
+          5: 100
+          6: 3
       enabled: 1
       index: matchheading
       label: Matchheading