Bug 15956: Remove warn from handle_patron_status

Removes a warn and some commented warns.

Test plan:
Nothing to do here. Will be covered later by additional unit test.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Bernardo Gonzalez Kriegel <bgkriegel@gmail.com>

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
This commit is contained in:
Marcel de Rooy 2016-03-02 14:20:59 +01:00 committed by Kyle M Hall
parent 7ce9008a00
commit 45625c17db

View file

@ -467,7 +467,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);
@ -475,9 +474,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 );