From: berick <berick@esilibrary.com>
Date: Wed, 20 Apr 2011 18:52:00 +0000 (-0400)
Subject: allow filter negation (e.g. -item_type(a) ) in dynamic filter query string building
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=56537cd1aabf35e472d303b3856224a38b70f923;p=evergreen%2Fequinox.git

allow filter negation (e.g. -item_type(a) ) in dynamic filter query string building
---

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 524c9a6b45..5f8643a623 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm
@@ -53,7 +53,7 @@ sub _prepare_biblio_search {
 
     # filters
     foreach (grep /^fi:/, $cgi->param) {
-        /:(\w+)$/ or next;
+        /:(-?\w+)$/ or next;
         my $term = join(",", $cgi->param($_));
         $query .= " $1($term)" if length $term;
     }