From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 3 Apr 2009 18:25:09 +0000 (+0000)
Subject: return the fleshed event from fire-event-by-barcode
X-Git-Tag: sprint4-merge-nov22~10336
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=5433a237c3c4ae03f24bdeee79a9798facfd33a1;p=working%2FEvergreen.git

return the fleshed event from fire-event-by-barcode

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index 58bccd388c..4805025d05 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -1108,7 +1108,14 @@ sub test_batch_circ_events {
         $event_id = [$event_id];
     }
 
-    return $U->simplereq('open-ils.trigger', $fire, $event_id);
+    my $resp = $U->simplereq('open-ils.trigger', $fire, $event_id);
+    return 0 unless $resp and ($resp->{event} or $resp->{events});
+    my $evt = $resp->{event} ? $resp->{event} : $resp->{events}->[0];
+
+    return $e->retrieve_action_trigger_event([
+        $evt->id,
+        {flesh => 1, flesh_fields => {atev => ['template_output', 'error_output']}}
+    ]);
 }