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 |
- |
|
|