and return the result of the cstore call

git-svn-id: svn://svn.open-ils.org/ILS/trunk@8976 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm b/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm
index e19d707..ea0160a 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/PermaCrud.pm
@@ -185,8 +185,9 @@ sub CRUD_action_object_permcheck {
     return $obj if ($self->{action} eq 'retrieve');
 
     my $val = $e->session->request("open-ils.cstore.direct.$o_type.$self->{action}" => $obj )->gather(1);
-
     $e->commit;
+
+    return $val;
 }
 
 sub search_permacrud {