From d445da171d09d040a0cc753b67ee47b04733b841 Mon Sep 17 00:00:00 2001 From: miker Date: Mon, 16 May 2005 17:34:42 +0000 Subject: [PATCH] removing useless chars from search git-svn-id: svn://svn.open-ils.org/ILS/trunk@732 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../perlmods/OpenILS/Application/Storage/Driver/Pg/fts.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/fts.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/fts.pm index 6e38562643..c6c64dfba3 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/fts.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/fts.pm @@ -9,6 +9,11 @@ my $self = shift; my $term = shift; + $log->debug("Raw term: $term",DEBUG); + + $term =~ s/\&//go; + $term =~ s/\|//go; + $self = ref($self) || $self; $self = bless {} => $self; -- 2.43.2