From: Bill Erickson Date: Fri, 14 Feb 2014 21:56:48 +0000 (-0500) Subject: squash me to 7e8f0c6; filtered recs syntax repair X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=8f6d7e1e01a21817d43b7d5d7597ad8c058abf2a;p=working%2FEvergreen.git squash me to 7e8f0c6; filtered recs syntax repair Signed-off-by: Bill Erickson --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm index 7eef90b2c3..efdacb7ae2 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm @@ -1302,7 +1302,7 @@ sub MR_records_matching_format { for my $r ( map { isTrue($_->deleted) ? () : ($_->id) } @$records ) { # the map{} below is tricky. it puts the record ID in front of each param. see $q above $client->respond($r) - if @{action::hold_request->db_Main->selectcol_arrayref( $q {}, map { ( $r => $_ ) } @args )}; + if @{action::hold_request->db_Main->selectcol_arrayref( $q, {}, map { ( $r => $_ ) } @args )}; } return; # discard final l-val