From db90853a5199ef49697402a20d48a9e7a4b7aec5 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Wed, 29 Oct 2014 17:07:06 -0400 Subject: [PATCH] kmain-151 - Hyphens are ignored in search. Cross-port: 9ff8534 --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm index f62f06e0cb..031a715a5e 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm @@ -47,6 +47,7 @@ sub _prepare_biblio_search_basics { # This stuff probably will need refined or rethought to better handle # the weird things Real Users will surely type in. $contains = "" unless defined $contains; # silence warning + $query =~ s/-//g; # Get rid of - if ($contains eq 'nocontains') { $query =~ s/"//g; $query = ('"' . $query . '"') if index $query, ' '; -- 2.11.0