From: Galen Charlton <gmc@equinoxinitiative.org>
Date: Thu, 31 Oct 2019 20:53:11 +0000 (-0400)
Subject: Fix new __age acq search operator
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=53a08aae97603fe21631e448403e5ae8395c7d7f;p=working%2FEvergreen.git

Fix new __age acq search operator

Signed-off-by: Galen Charlton <gmc@equinoxinitiative.org>
---

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 e1ce5e6541..14fdced2c2 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Search.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Search.pm
@@ -268,7 +268,7 @@ sub prepare_terms {
                 $v =~ s/^\s*//;
 
                 my $op = $gte ? '>=' : '<=';
-                $term_clause = {$k = {$op => {transform => 'age', params => ['now'], value => '-' . $v}}};
+                $term_clause = {$k => {$op => {transform => 'age', params => ['now'], value => '-' . $v}}};
 
                 # !!! NOTE: we invert $not because we have to compare to a /negative/
                 # interval, due to json_query restiction on function parameter order for