fix the MultiSession success handlers

Signed-off-by: Galen Charlton <gmc@esilibrary.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircNotify.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircNotify.pm
index ea72217..7265832 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircNotify.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircNotify.pm
@@ -62,11 +62,11 @@ sub circ_batch_notify {
             my $self = shift;
             my $req = shift;
 
-            my $event = $req->gather(1);
-            next unless $event;
+            my $event = $req->{response}->[0]->content;
+            return unless $event;
             $event = $e->retrieve_action_trigger_event($event);
 
-            next unless $event;
+            return unless $event;
             $events{$event->event_def} ||= [];
             push @{$events{$event->event_def}}, $event->id;
         },
@@ -92,7 +92,7 @@ sub circ_batch_notify {
         success_handler     => sub {
             my $self = shift;
             my $req = shift;
-            $client->respond( $req->gather(1) );
+            $client->respond( $req->{response}->[0]->content );
         },
     );