use editor

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
index b909114..b5ab89b 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
@@ -2639,7 +2639,7 @@ sub update_user_request {
             if ( $cancel_reason ) {
                 $aur_obj->cancel_reason( $cancel_reason );
                 $e->update_acq_user_request($aur_obj) or return $e->die_event;
-                create_user_request_events( [ $aur_obj ], 'aur.rejected' );
+                create_user_request_events( $e, [ $aur_obj ], 'aur.rejected' );
             } else {
                 $e->delete_acq_user_request($aur_obj);
             }
@@ -2704,17 +2704,15 @@ sub new_user_request {
         }
     }
 
-    $aur_obj = $e->create_acq_user_request($aur_obj) or $e->die_event;
+    $aur_obj = $e->create_acq_user_request($aur_obj) or return $e->die_event;
 
-    $e->commit;
-
-    create_user_request_events( [ $aur_obj ], 'aur.created' );
+    $e->commit and create_user_request_events( $e, [ $aur_obj ], 'aur.created' );
 
     return $aur_obj;
 }
 
 sub create_user_request_events {
-    my($user_reqs, $hook) = @_;
+    my($e, $user_reqs, $hook) = @_;
 
     my $ses = OpenSRF::AppSession->create('open-ils.trigger');
     $ses->connect;