From cabae2ffd0076a3738be8d50c4727a9b349f5268 Mon Sep 17 00:00:00 2001 From: Chris Sharp Date: Thu, 24 Jan 2013 13:06:26 -0500 Subject: [PATCH] berick's fix for LP 1032808 --- Open-ILS/src/perlmods/lib/OpenILS/SIP.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm b/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm index fe312ffd2f..a639a17a8a 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm @@ -220,9 +220,11 @@ sub login { my $key = $response->{payload}->{authtoken}; syslog('LOG_INFO', "OILS: Login succeeded for $username : authkey = $key"); - $self->fetch_session; # to cache the login + $self->{authtoken} = $key; - return $self->{authtoken} = $key; + $self->fetch_session; # to cache the login + + return $key; } -- 2.11.0