From 281310c8786d8a3f5f78ead3a935cb033f607095 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 18 Mar 2011 16:51:20 +0000
Subject: [PATCH] added field_safe attr to ccs, aout, and crahp classes; 
 capture field_safe attr during IDL parsing

git-svn-id: svn://svn.open-ils.org/ILS/trunk@19807 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/examples/fm_IDL.xml                           | 6 +++---
 Open-ILS/src/perlmods/lib/OpenILS/Utils/Fieldmapper.pm | 2 ++
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/Open-ILS/examples/fm_IDL.xml b/Open-ILS/examples/fm_IDL.xml
index 3047e2a573..6d3cf94c7d 100644
--- a/Open-ILS/examples/fm_IDL.xml
+++ b/Open-ILS/examples/fm_IDL.xml
@@ -2568,7 +2568,7 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
             </actions>
         </permacrud>
 	</class>
-	<class id="ccs" controller="open-ils.cstore open-ils.pcrud" oils_obj:fieldmapper="config::copy_status" oils_persist:tablename="config.copy_status" oils_persist:restrict_primary="100" reporter:label="Copy Status">
+	<class id="ccs" controller="open-ils.cstore open-ils.pcrud" oils_obj:fieldmapper="config::copy_status" oils_persist:tablename="config.copy_status" oils_persist:restrict_primary="100" reporter:label="Copy Status" oils_persist:field_safe="true">
 		<fields oils_persist:primary="id" oils_persist:sequence="config.copy_status_id_seq">
 			<field name="holdable" reporter:datatype="bool"/>
 			<field name="id" reporter:selector="name" reporter:datatype="id"/>
@@ -4330,7 +4330,7 @@ SELECT  usr,
 			<link field="owning_lib" reltype="has_a" key="id" map="" class="aou"/>
 		</links>
 	</class>
-	<class id="aout" controller="open-ils.cstore open-ils.pcrud" oils_obj:fieldmapper="actor::org_unit_type" oils_persist:tablename="actor.org_unit_type" reporter:label="Organizational Unit Type">
+	<class id="aout" controller="open-ils.cstore open-ils.pcrud" oils_obj:fieldmapper="actor::org_unit_type" oils_persist:tablename="actor.org_unit_type" reporter:label="Organizational Unit Type" oils_persist:field_safe="true">
 		<fields oils_persist:primary="id" oils_persist:sequence="actor.org_unit_type_id_seq">
 			<field reporter:label="Subordinate Types" name="children" oils_persist:virtual="true" reporter:datatype="link"/>
 			<field reporter:label="Can Have Users?" name="can_have_users" reporter:datatype="bool"/>
@@ -4757,7 +4757,7 @@ SELECT  usr,
 		</permacrud>
 	</class>
 
-	<class id="crahp" controller="open-ils.cstore open-ils.pcrud" oils_obj:fieldmapper="config::rules::age_hold_protect" oils_persist:tablename="config.rule_age_hold_protect" reporter:label="Age Hold Protection Rule">
+	<class id="crahp" controller="open-ils.cstore open-ils.pcrud" oils_obj:fieldmapper="config::rules::age_hold_protect" oils_persist:tablename="config.rule_age_hold_protect" reporter:label="Age Hold Protection Rule" oils_persist:field_safe="true">
 		<fields oils_persist:primary="id" oils_persist:sequence="config.rule_age_hold_protect_id_seq">
 			<field reporter:label="Item Age" name="age" reporter:datatype="interval"/>
 			<field reporter:label="Rule ID" name="id" reporter:selector="name" reporter:datatype="id"/>
diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/Fieldmapper.pm b/Open-ILS/src/perlmods/lib/OpenILS/Utils/Fieldmapper.pm
index bb582dcfdb..e1bebb7219 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/Fieldmapper.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/Fieldmapper.pm
@@ -160,6 +160,7 @@ sub load_class {
 		$tablename = '';
 	}
 	my $restrict_primary = get_attribute( $attribute_list, 'oils_persist:restrict_primary' );
+	my $field_safe = get_attribute( $attribute_list, 'oils_persist:field_safe' );
 
 	# Load the attributes into the Fieldmapper --------------------
 
@@ -170,6 +171,7 @@ sub load_class {
 	$$fieldmap{$fm}{ table }            = $tablename;
 	$$fieldmap{$fm}{ controller }       = [ split ' ', $controller ];
 	$$fieldmap{$fm}{ restrict_primary } = $restrict_primary;
+	$$fieldmap{$fm}{ field_safe }       = $field_safe;
 
 	# Load fields and links
 
-- 
2.11.0