|
Lines 466-472
sub build_issue_data {
Link Here
|
| 466 |
$it->{'od'} = $it->{'overdue'}; |
466 |
$it->{'od'} = $it->{'overdue'}; |
| 467 |
($it->{'author'} eq '') and $it->{'author'} = ' '; |
467 |
($it->{'author'} eq '') and $it->{'author'} = ' '; |
| 468 |
$it->{'renew_failed'} = $renew_failed{$it->{'itemnumber'}}; |
468 |
$it->{'renew_failed'} = $renew_failed{$it->{'itemnumber'}}; |
| 469 |
$it->{'return_failed'} = $return_failed{$it->{'itemnumber'}}; |
469 |
$it->{'return_failed'} = $return_failed{$it->{'barcode'}}; |
| 470 |
|
470 |
|
| 471 |
if ( $it->{'issuedate'} gt $todaysdate or $it->{'lastreneweddate'} gt $todaysdate ) { |
471 |
if ( $it->{'issuedate'} gt $todaysdate or $it->{'lastreneweddate'} gt $todaysdate ) { |
| 472 |
(!$relatives) ? push @todaysissues, $it : push @relissues, $it; |
472 |
(!$relatives) ? push @todaysissues, $it : push @relissues, $it; |
| 473 |
- |
|
|