|
Lines 125-137
sub build_reserve_data {
Link Here
|
| 125 |
|
125 |
|
| 126 |
while ( my $reserve = $reserves->next() ) { |
126 |
while ( my $reserve = $reserves->next() ) { |
| 127 |
|
127 |
|
| 128 |
my $row = { |
128 |
my $row = { |
| 129 |
title => $reserve->biblio()->title(), |
129 |
title => $reserve->biblio()->title(), |
| 130 |
author => $reserve->biblio()->author(), |
130 |
author => $reserve->biblio()->author(), |
| 131 |
reservedate => $reserve->reservedate(), |
131 |
reservedate => $reserve->reservedate(), |
| 132 |
expirationdate => $reserve->expirationdate(), |
132 |
expirationdate => $reserve->expirationdate(), |
| 133 |
waiting_at => $reserve->branch()->branchname(), |
133 |
waiting_at => $reserve->branch()->branchname(), |
| 134 |
}; |
134 |
}; |
| 135 |
|
135 |
|
| 136 |
push( @{$return}, $row ); |
136 |
push( @{$return}, $row ); |
| 137 |
} |
137 |
} |
| 138 |
- |
|
|