|
Lines 470-475
sub GetPatronInfo {
Link Here
|
| 470 |
while ( my $c = $pending_checkouts->next ) { |
470 |
while ( my $c = $pending_checkouts->next ) { |
| 471 |
# FIXME We should only retrieve what is needed in the template |
471 |
# FIXME We should only retrieve what is needed in the template |
| 472 |
my $issue = $c->unblessed_all_relateds; |
472 |
my $issue = $c->unblessed_all_relateds; |
|
|
473 |
delete $issue->{'more_subfields_xml'}; |
| 473 |
push @checkouts, $issue |
474 |
push @checkouts, $issue |
| 474 |
} |
475 |
} |
| 475 |
$borrower->{'loans'}->{'loan'} = \@checkouts; |
476 |
$borrower->{'loans'}->{'loan'} = \@checkouts; |
| 476 |
- |
|
|