@@ -, +, @@ --- C4/SIP/Sip/MsgType.pm | 4 ---- 1 file changed, 4 deletions(-) --- a/C4/SIP/Sip/MsgType.pm +++ a/C4/SIP/Sip/MsgType.pm @@ -468,7 +468,6 @@ sub build_patron_status { sub handle_patron_status { my ( $self, $server ) = @_; - warn "handle_patron_status server: " . Dumper( \$server ); my $ils = $server->{ils}; my $patron; my $resp = (PATRON_STATUS_RESP); @@ -476,9 +475,6 @@ sub handle_patron_status { my ( $lang, $date ) = @{ $self->{fixed_fields} }; my $fields = $self->{fields}; - #warn Dumper($fields); - #warn FID_INST_ID; - #warn $fields->{(FID_INST_ID)}; $ils->check_inst_id( $fields->{ (FID_INST_ID) }, "handle_patron_status" ); $patron = $ils->find_patron( $fields->{ (FID_PATRON_ID) } ); $resp = build_patron_status( $patron, $lang, $fields, $server ); --