From 6921a0d9aa84cf860b4089ab966c1bed8a9832da Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Thu, 10 Jun 2021 13:25:05 -0700 Subject: [PATCH] LP1901930 Respond to end-session message Send a response to the mediators 'XS' end session message so the mediators knows when it's safe to shut down its HTTP connection to us. Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm index 887de63b7c..e203f06894 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm @@ -49,7 +49,6 @@ __PACKAGE__->register_method( sub dispatch_sip2_request { my ($self, $client, $seskey, $message) = @_; - OpenSRF::AppSession->ingress('sip2'); return OpenILS::Event->new('SIP2_SESSION_REQUIRED') unless $seskey; @@ -91,13 +90,14 @@ sub handle_end_session { my ($session, $message) = @_; my $e = $session->editor; my $seskey = $session->seskey; + my $resp = {code => 'XT'}; $SC->cache->delete_cache("sip2_$seskey"); $U->simplereq('open-ils.auth', 'open-ils.auth.session.delete', $e->authtoken); - return undef if $U->is_true($session->sip_account->transient); + return $resp if $U->is_true($session->sip_account->transient); $e->xact_begin; my $ses = $e->retrieve_sip_session($seskey); @@ -108,7 +108,7 @@ sub handle_end_session { $e->rollback; } - return undef; + return $resp; } # Login to Evergreen and cache the login data. -- 2.11.0