[open-ils-commits] r9104 - trunk/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: miker
Date: 2008-03-21 00:06:34 -0400 (Fri, 21 Mar 2008)
New Revision: 9104

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm
Log:
remove fleshing capabilities inside permacrud -- may reimplement in a cruddy fashsion later

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm	2008-03-20 20:37:40 UTC (rev 9103)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm	2008-03-21 04:06:34 UTC (rev 9104)
@@ -196,6 +196,11 @@
     my $auth = shift;
     my @args = @_;
 
+    if (@args > 1) {
+        delete $args[1]{flesh};
+        delete $args[1]{flesh_fields};
+    }
+
     my $e = new_editor(authtoken => $auth, xact => 1);
     return $e->event unless $e->checkauth;