View | Details | Raw Unified | Return to bug 13871
Collapse All | Expand All

(-)a/C4/SIP/Sip/MsgType.pm (-3 / +2 lines)
Lines 459-465 sub build_patron_status { Link Here
459
        ( $protocol_version >= 2 )
459
        ( $protocol_version >= 2 )
460
          and $resp .= add_field( FID_VALID_PATRON, 'N' );
460
          and $resp .= add_field( FID_VALID_PATRON, 'N' );
461
461
462
        $resp .= maybe_add( FID_SCREEN_MSG, INVALID_CARD );
462
        $resp .= maybe_add( FID_SCREEN_MSG, INVALID_CARD, $server );
463
    }
463
    }
464
464
465
    $resp .= add_field( FID_INST_ID, $fields->{ (FID_INST_ID) } );
465
    $resp .= add_field( FID_INST_ID, $fields->{ (FID_INST_ID) } );
Lines 1028-1034 sub handle_patron_info { Link Here
1028
        if ( $protocol_version >= 2 ) {
1028
        if ( $protocol_version >= 2 ) {
1029
            $resp .= add_field( FID_VALID_PATRON, 'N' );
1029
            $resp .= add_field( FID_VALID_PATRON, 'N' );
1030
        }
1030
        }
1031
        $resp .= maybe_add( FID_SCREEN_MSG, INVALID_CARD );
1031
        $resp .= maybe_add( FID_SCREEN_MSG, INVALID_CARD, $server );
1032
    }
1032
    }
1033
1033
1034
    $self->write_msg( $resp, undef, $server->{account}->{terminator}, $server->{account}->{encoding} );
1034
    $self->write_msg( $resp, undef, $server->{account}->{terminator}, $server->{account}->{encoding} );
1035
- 

Return to bug 13871