From: Jason Etheridge <jason@EquinoxOLI.org>
Date: Tue, 31 May 2022 09:47:52 +0000 (-0400)
Subject: LP1901930 make Renew All consider bad passwords
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=25780122b1e5a7578ac7ec481b9fab8090853fa5;p=working%2FEvergreen.git

LP1901930 make Renew All consider bad passwords

Signed-off-by: Jason Etheridge <jason@EquinoxOLI.org>
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 a5a8ba095e..119de4d5db 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm
@@ -612,6 +612,7 @@ sub handle_renew_all {
     my $config = $session->config;
 
     my $patron_barcode = $SC->get_field_value($message, 'AA');
+    my $patron_password = $SC->get_field_value($message, 'AD');
     my $fee_ack = $SC->get_field_value($message, 'BO');
 
     my $stub = {
@@ -629,7 +630,7 @@ sub handle_renew_all {
     };
 
     my $patron_details = OpenILS::Application::SIP2::Patron->get_patron_details(
-        $session, barcode => $patron_barcode);
+        $session, barcode => $patron_barcode, password => $patron_password);
 
     return $stub unless $patron_details;