From 2b876b7d10c8d5e7c34b2a1971b092d1aadd9b24 Mon Sep 17 00:00:00 2001 From: Dan Scott Date: Mon, 19 Mar 2012 16:04:49 -0400 Subject: [PATCH] TPAC: Prevent OU-invisible copies from being displayed to public Per LP# 959577, "We've found that copies from OU's with OPAC visible set to false are displaying on the record details page of tpac." This fixes that by including the pertinent clause in mk_copy_query()'s version of what in-db unapi does. Some day we will unite under the same logic and be stronger! Signed-off-by: Dan Scott Signed-off-by: Jason Stephenson --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm index 2daaf2ffe0..e977a47b28 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm @@ -248,6 +248,7 @@ sub mk_copy_query { $query->{where}->{'+acp'}->{opac_visible} = 't'; $query->{from}->{'acp'}->{'acpl'}->{filter} = {opac_visible => 't'}; $query->{from}->{'acp'}->{'ccs'}->{filter} = {opac_visible => 't'}; + $query->{from}->{'acp'}->{'aou'}->{filter} = {opac_visible => 't'}; } return $query; -- 2.43.2