From: Jason Stephenson <jstephenson@mvlc.org>
Date: Mon, 26 Sep 2011 19:52:52 +0000 (-0400)
Subject: Verify session before trying any transactions in SIP->pay_fee.
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=f16d389b156b56a75a9782d878511bb73ad04627;p=evergreen%2Ftadl.git

Verify session before trying any transactions in SIP->pay_fee.

Signed-off-by: Jason Stephenson <jstephenson@mvlc.org>
Signed-off-by: Dan Scott <dscott@laurentian.ca>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm b/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm
index 54b0f4e733..6292c36f1c 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/SIP.pm
@@ -420,6 +420,8 @@ sub pay_fee {
     my ($self, $patron_id, $patron_pwd, $fee_amt, $fee_type,
 	$pay_type, $fee_id, $trans_id, $currency) = @_;
 
+    $self->verify_session;
+
     my $xact = OpenILS::SIP::Transaction::FeePayment->new(authtoken => $self->{authtoken});
     my $patron = $self->find_patron($patron_id);