From: Bill Erickson <berickxx@gmail.com>
Date: Wed, 29 Oct 2014 21:07:17 +0000 (-0400)
Subject: kmain163_contains_phrase_#_works
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=efaba371f788cb2f404e9a2220dad5a281b0d219;p=working%2FEvergreen.git

kmain163_contains_phrase_#_works

    Cross-port: a3cf362

Conflicts:
	Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
index d9f5752815..838679da58 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
@@ -11,6 +11,7 @@ use OpenILS::Utils::CStoreEditor;
 use OpenSRF::Utils::Logger qw($logger);
 use Data::Dumper;
 my $U = 'OpenILS::Application::AppUtils';
+use OpenSRF::Utils::Logger qw/$logger/;
 
 my ${spc} = ' ' x 2;
 sub subquery_callback {
@@ -84,7 +85,7 @@ sub quote_phrase_value {
     my $self = shift;
     my $value = shift;
     my $wb = shift;
-
+    
     my $left_anchored = '';
     my $right_anchored = '';
     my $left_wb = 0;
@@ -100,7 +101,6 @@ sub quote_phrase_value {
 
     $value =~ s/^[*\^]//   if $left_anchored;
     $value =~ s/[*\$]$//  if $right_anchored;
-    $value = quotemeta($value);
     $value = '^' . $value if $left_anchored eq '^';
     $value = "$value\$"   if $right_anchored eq '$';
     $value = '[[:<:]]' . $value if $left_wb && !$left_anchored;