LP1901930 Respond to end-session message part 2

Signed-off-by: Bill Erickson <berickxx@gmail.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm
index e203f06..4a7f51d 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm
@@ -63,7 +63,7 @@ sub dispatch_sip2_request {
     my $session = OpenILS::Application::SIPSession->find($seskey);
 
     if (!$session) {
-        return undef if $msg_code eq 'XS'; # end session signal
+        return {code => 'XT'} if $msg_code eq 'XS'; # end session signal
         return OpenILS::Event->new('SIP2_SESSION_REQUIRED');
     }