From: Jeff Davis <jdavis@sitka.bclibraries.ca>
Date: Tue, 3 Nov 2015 20:46:31 +0000 (-0800)
Subject: LP#1499086: bugfix for copy filter in basic_opac_copy_query
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=refs%2Fheads%2Fuser%2Fjeffdavis%2Flp1499086-bookbag-slowness;p=working%2FEvergreen.git

LP#1499086: bugfix for copy filter in basic_opac_copy_query

Signed-off-by: Jeff Davis <jdavis@sitka.bclibraries.ca>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
index 59cd14076f..4ebdfc13dc 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
@@ -2038,7 +2038,10 @@ sub basic_opac_copy_query {
         },
 
         where => {
-            deleted => 'f',
+            '+acp' => { 
+                deleted => 'f', 
+                ($staff ? () : (opac_visible => 't'))
+            }, 
             ($rec_id ? (record => $rec_id) : ()),
             ($dist_id ? ( '+sstr' => { distribution => $dist_id } ) : ()),
             ($staff ? () : ( '+aou' => { opac_visible => 't' } ))