From: Bill Erickson <berick@esilibrary.com>
Date: Wed, 11 Jul 2012 15:09:57 +0000 (-0400)
Subject: acq invoice search; aclid support in search call
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=aa7d024f0c1905b4d42b2a18a8d451256d29c414;p=evergreen%2Fequinox.git

acq invoice search; aclid support in search call

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Search.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Search.pm
index cbf4c73c5c..fce6604cf7 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Search.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Search.pm
@@ -229,7 +229,7 @@ sub prepare_terms {
     my $conj = $is_and ? "-and" : "-or";
     my $outer_clause = {};
 
-    foreach my $class (qw/acqpo acqpl acqinv jub/) {
+    foreach my $class (qw/acqpo acqpl acqinv jub acqlid/) {
         next if not exists $terms->{$class};
 
         $outer_clause->{$conj} = [] unless $outer_clause->{$conj};