$debug and warn "do_checkin() calling AddReturn($barcode, $branch)";
my ($return, $messages, $issue, $borrower) = AddReturn($barcode, $branch, undef, undef, $return_date);
- $self->alert(!$return);
- # ignoring messages: NotIssued, WasLost, WasTransfered
# biblionumber, biblioitemnumber, itemnumber
# borrowernumber, reservedate, branchcode
$self->{item}->hold_patron_id( $messages->{ResFound}->{borrowernumber} );
$self->{item}->destination_loc( $messages->{ResFound}->{branchcode} );
}
- $self->alert(1) if defined $self->alert_type; # alert_type could be "00", hypothetically
+ $self->alert(defined $self->alert_type); # alert_type could be "00", hypothetically
$self->ok($return);
}