From fae92fb5c18d1892457ba010cabe943fb74e9020 Mon Sep 17 00:00:00 2001 From: Dan Scott Date: Thu, 1 Dec 2016 17:24:01 -0500 Subject: [PATCH] Fix SIP timeouts due to invalid sessions Signed-off-by: Dan Scott --- Open-ILS/src/perlmods/lib/OpenILS/SIP.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm b/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm index 81307f4e5b..998ea8509d 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm @@ -295,12 +295,14 @@ sub find_patron { my $key = (@_ > 1) ? shift : 'barcode'; # if we have multiple args, the first is the key index (default barcode) my $patron_id = shift; + $self->verify_session; return OpenILS::SIP::Patron->new($key => $patron_id, authtoken => $self->{authtoken}, @_); } sub find_item { my $self = shift; + $self->verify_session; return OpenILS::SIP::Item->new(@_); } -- 2.11.0