Lines 965-973
sub handle_patron_info {
Link Here
|
965 |
if ( defined($patron_pwd) ) { |
965 |
if ( defined($patron_pwd) ) { |
966 |
|
966 |
|
967 |
# If patron password was provided, report whether it was right or not. |
967 |
# If patron password was provided, report whether it was right or not. |
968 |
$password_rc = $patron->check_password($patron_pwd); |
|
|
969 |
if ( $patron_pwd eq q{} && $server->{account}->{allow_empty_passwords} ) { |
968 |
if ( $patron_pwd eq q{} && $server->{account}->{allow_empty_passwords} ) { |
970 |
$password_rc = 1; |
969 |
$password_rc = 1; |
|
|
970 |
} else { |
971 |
$password_rc = $patron->check_password($patron_pwd); |
971 |
} |
972 |
} |
972 |
$resp .= add_field( FID_VALID_PATRON_PWD, sipbool( $password_rc ) ); |
973 |
$resp .= add_field( FID_VALID_PATRON_PWD, sipbool( $password_rc ) ); |
973 |
} |
974 |
} |
974 |
- |
|
|