Advertisement
Guest User

Untitled

a guest
Jan 11th, 2016
111
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.57 KB | None | 0 0
  1. # Fill any reserves the patron had on the item.
  2. # TODO: this logic should be pulled internal to AddIssue for all Koha.
  3. $debug and warn "pending_queue: " . (@$pending) ? Dumper($pending) : '[]';
  4. foreach (grep {$_->{borrowernumber} eq $self->{patron}->{borrowernumber}} @$pending) {
  5. $debug and warn "Filling reserve (borrowernumber,biblionumber,reservedate): "
  6. . sprintf("(%s,%s,%s)\n",$_->{borrowernumber},$_->{biblionumber},$_->{reservedate});
  7. ModReserveFill($_);
  8. # TODO: adjust representation in $self->item
  9. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement