From 8f6d7e1e01a21817d43b7d5d7597ad8c058abf2a Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Fri, 14 Feb 2014 16:56:48 -0500 Subject: [PATCH] squash me to 7e8f0c6; filtered recs syntax repair Signed-off-by: Bill Erickson --- .../src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- 2.11.0