Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- # Fill any reserves the patron had on the item.
- # TODO: this logic should be pulled internal to AddIssue for all Koha.
- $debug and warn "pending_queue: " . (@$pending) ? Dumper($pending) : '[]';
- foreach (grep {$_->{borrowernumber} eq $self->{patron}->{borrowernumber}} @$pending) {
- $debug and warn "Filling reserve (borrowernumber,biblionumber,reservedate): "
- . sprintf("(%s,%s,%s)\n",$_->{borrowernumber},$_->{biblionumber},$_->{reservedate});
- ModReserveFill($_);
- # TODO: adjust representation in $self->item
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement