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 a5a8ba0..119de4d 100644 (file)
--- 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;