From a9f54d5d95f18cefee775cab0419631435bdbb9f Mon Sep 17 00:00:00 2001 From: erickson Date: Thu, 23 Sep 2010 07:17:00 +0000 Subject: [PATCH] fetch last updated event before comitting to stay in the xact git-svn-id: svn://svn.open-ils.org/ILS/trunk@17914 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm index 34b942369e..a5c742dc0f 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm @@ -212,11 +212,11 @@ sub update_state { if (scalar(@oks) < scalar(@{ $self->ids })) { $self->editor->xact_rollback; return undef; - } else { - $ok = $self->editor->xact_commit; - } + } my $updated = $self->editor->retrieve_action_trigger_event($last_updated); + $ok = $self->editor->xact_commit; + if ($ok) { for my $event ( @{ $self->events } ) { my $e = $event->event; -- 2.11.0