From: erickson Date: Fri, 18 Mar 2011 16:52:00 +0000 (+0000) Subject: added field_safe attr to ccs, aout, and crahp classes; capture field_safe attr durin... X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=1224377608afde6b97bd5b72d5927990200df928;p=evergreen%2Ftadl.git 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/branches/rel_2_1@19808 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- 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 - + @@ -4330,7 +4330,7 @@ SELECT usr, - + @@ -4757,7 +4757,7 @@ SELECT usr, - + 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