Lines 1001-1010
sub handle_patron_info {
Link Here
|
1001 |
if( defined( $patron_pwd ) && !$password_rc ) { |
1001 |
if( defined( $patron_pwd ) && !$password_rc ) { |
1002 |
$msg .= ' -- ' . INVALID_PW; |
1002 |
$msg .= ' -- ' . INVALID_PW; |
1003 |
} |
1003 |
} |
|
|
1004 |
$resp .= maybe_add( FID_SCREEN_MSG, $msg, $server ); |
1004 |
if ( $server->{account}->{send_patron_home_library_in_af} ) { |
1005 |
if ( $server->{account}->{send_patron_home_library_in_af} ) { |
1005 |
$msg .= ' -- ' . $patron->{branchcode}; |
1006 |
$resp .= maybe_add( FID_SCREEN_MSG, $patron->{branchcode}, $server); |
1006 |
} |
1007 |
} |
1007 |
$resp .= maybe_add( FID_SCREEN_MSG, $msg, $server ); |
|
|
1008 |
$resp .= maybe_add( FID_PRINT_LINE, $patron->print_line ); |
1008 |
$resp .= maybe_add( FID_PRINT_LINE, $patron->print_line ); |
1009 |
} else { |
1009 |
} else { |
1010 |
|
1010 |
|
1011 |
- |
|
|