From c9507279bfb7d240c2edc63161d656c1b041aebc Mon Sep 17 00:00:00 2001 From: Jason Etheridge Date: Tue, 31 May 2022 05:47:52 -0400 Subject: [PATCH] LP1901930 make Renew All consider bad passwords Signed-off-by: Jason Etheridge Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/Application/SIP2.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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; -- 2.11.0