From 54a37f381503b47b042efcfe37e784123eeb5773 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Tue, 30 Aug 2011 12:54:48 -0400 Subject: [PATCH] Tpac: only show opac_visible notification opt-in settings Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm index 344696a3a0..e32cd93db4 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm @@ -163,6 +163,9 @@ sub fetch_optin_prefs { 'open-ils.actor.event_def.opt_in.settings.atomic', $e->authtoken, $e->requestor->home_ou); + # some opt-ins are staff-only + $opt_ins = [ grep { $U->is_true($_->opac_visible) } @$opt_ins ]; + # fetch user setting values for each of the opt-in settings my $user_set = $U->simplereq( 'open-ils.actor', -- 2.43.2