From b910387aeecc0c3e23e6d5263e547ccb4a8e7053 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 14 Nov 2008 20:04:56 +0000
Subject: [PATCH] added VIEW_BILLING_TYPE perm awareness

git-svn-id: svn://svn.open-ils.org/ILS/trunk@11193 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/examples/fm_IDL.xml                      | 2 +-
 Open-ILS/src/perlmods/OpenILS/Application/Circ.pm | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/Open-ILS/examples/fm_IDL.xml b/Open-ILS/examples/fm_IDL.xml
index 81b666bc2d..ebb6c6bad2 100644
--- a/Open-ILS/examples/fm_IDL.xml
+++ b/Open-ILS/examples/fm_IDL.xml
@@ -3448,7 +3448,7 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
         <permacrud xmlns="http://open-ils.org/spec/opensrf/IDL/permacrud/v1">
             <actions>
                 <create permission="CREATE_BILLING_TYPE"/>
-                <retrieve permission="CREATE_BILLING_TYPE|UPDATE_BILLING_TYPE|DELETE_BILLING_TYPE"/>
+                <retrieve permission="VIEW_BILLING_TYPE|CREATE_BILLING_TYPE|UPDATE_BILLING_TYPE|DELETE_BILLING_TYPE"/>
                 <update permission="UPDATE_BILLING_TYPE"/>
                 <delete permission="DELETE_BILLING_TYPE"/>
             </actions>
diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index 1d888c4a81..93db5b5a06 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -91,6 +91,7 @@ sub ranged_billing_types {
     my($self, $conn, $auth, $org_id, $depth) = @_;
     my $e = new_editor(authtoken => $auth);
     return $e->event unless $e->checkauth;
+    return $e->event unless $e->allowed('VIEW_BILLING_TYPE', $org_id);
     return $e->search_config_billing_type(
         {owner => $U->get_org_full_path($org_id, $depth)});
 }
-- 
2.11.0