From: phasefx Date: Mon, 29 Mar 2010 20:36:08 +0000 (+0000) Subject: use editor X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=657107e8ffb10872d6137ef7ae9c2c7b81d0d0df;p=evergreen%2Fbjwebb.git 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 b9091140a..b5ab89b50 100644 --- 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;