From a120e1023b17b357c37879a4ef0bafe8b8ad13fe Mon Sep 17 00:00:00 2001
From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Wed, 16 Aug 2006 12:57:18 +0000
Subject: [PATCH] adding "usergroup" to grp_tree so we can protect people from
 using groups that they have been explicitly told not to

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

diff --git a/Open-ILS/examples/fm_IDL.xml b/Open-ILS/examples/fm_IDL.xml
index 4c6f5a7772..660fb391cd 100644
--- a/Open-ILS/examples/fm_IDL.xml
+++ b/Open-ILS/examples/fm_IDL.xml
@@ -1656,6 +1656,7 @@
 			<field name="parent" oils_obj:array_position="7" oils_persist:virtual="false" />
 			<field name="perm_interval" oils_obj:array_position="8" oils_persist:virtual="false" />
 			<field name="application_perm" oils_obj:array_position="9" oils_persist:virtual="false" />
+			<field name="usergroup" oils_obj:array_position="10" oils_persist:virtual="false" />
 		</fields>
 		<links>
 			<link field="parent" reltype="has_a" key="id" map="" class="pgt"/>
diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm
index 8b3deed434..3168267a09 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm
@@ -15,7 +15,8 @@ package permission::grp_tree;
 use base qw/permission/;
 __PACKAGE__->table('permission_grp_tree');
 __PACKAGE__->columns(Primary => qw/id/);
-__PACKAGE__->columns(Essential => qw/name parent description perm_interval application_perm/);
+__PACKAGE__->columns(Essential => qw/name parent description perm_interval
+				     application_perm usergroup/);
 #-------------------------------------------------------------------------------
 package permission::usr_grp_map;
 use base qw/permission/;
-- 
2.11.0