From: Galen Charlton <gmc@esilibrary.com>
Date: Wed, 3 Aug 2016 20:32:28 +0000 (-0400)
Subject: protect against receive nothing
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=3a028c81dd7cbb73e87d0c0448be292e3fc4b51a;p=working%2FEvergreen.git

protect against receive nothing

... as might be the case if the user hasn't opted in

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 72658327ea..83de41640d 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircNotify.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircNotify.pm
@@ -62,6 +62,7 @@ sub circ_batch_notify {
             my $self = shift;
             my $req = shift;
 
+            return unless $req->{response}->[0];
             my $event = $req->{response}->[0]->content;
             return unless $event;
             $event = $e->retrieve_action_trigger_event($event);
@@ -92,6 +93,8 @@ sub circ_batch_notify {
         success_handler     => sub {
             my $self = shift;
             my $req = shift;
+
+            return unless $req->{response}->[0];
             $client->respond( $req->{response}->[0]->content );
         },
     );