|
Lines 130-141
sub new {
Link Here
|
| 130 |
|
130 |
|
| 131 |
# FIXME: populate fine_items recall_items |
131 |
# FIXME: populate fine_items recall_items |
| 132 |
$ilspatron{unavail_holds} = _get_outstanding_holds($kp->{borrowernumber}); |
132 |
$ilspatron{unavail_holds} = _get_outstanding_holds($kp->{borrowernumber}); |
|
|
133 |
|
| 133 |
my $pending_checkouts = $patron->pending_checkouts; |
134 |
my $pending_checkouts = $patron->pending_checkouts; |
| 134 |
my @items_infos; |
135 |
my @barcodes; |
| 135 |
while ( my $c = $pending_checkouts->next ) { |
136 |
while ( my $c = $pending_checkouts->next ) { |
| 136 |
push @items_infos, $c->unblessed_all_relateds; |
137 |
push @barcodes, { barcode => $c->item->barcode }; |
| 137 |
} |
138 |
} |
| 138 |
$ilspatron{items} = \@items_infos; |
139 |
$ilspatron{items} = \@barcodes; |
| 139 |
|
140 |
|
| 140 |
$self = \%ilspatron; |
141 |
$self = \%ilspatron; |
| 141 |
$debug and warn Dumper($self); |
142 |
$debug and warn Dumper($self); |
| 142 |
- |
|
|