gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

This commit is contained in:
tipaul 2003-07-07 14:46:55 +00:00
parent 354b08cb47
commit c101d517bb
1 changed files with 14 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
circ/circulation.pl
View File

@ -218,16 +218,20 @@ if ($borrower) {
} else {
push @previousissues, $issueslist->{$it};
}
}
my $tcolor = '';
my $pcolor = '';
foreach my $book (sort {$b->{'timestamp'} <=> $a->{'timestamp'}} @todaysissues){
my $dd = $book->{'date_due'};
my $datedue = $book->{'date_due'};
$dd=format_date($dd);
$datedue=~s/-//g;
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
my $tcolor = '';
my $pcolor = '';
foreach my $book (sort {$b->{'timestamp'} <=> $a->{'timestamp'}} @todaysissues){
my $dd = $book->{'date_due'};
my $datedue = $book->{'date_due'};
$dd=format_date($dd);
$datedue=~s/-//g;
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
}
($tcolor eq $linecolor1) ? ($tcolor=$linecolor2) : ($tcolor=$linecolor1);
$book->{'dd'}=$dd;
$book->{'tcolor'}=$tcolor;
push @realtodayissues,$book;
}
($tcolor eq $linecolor1) ? ($tcolor=$linecolor2) : ($tcolor=$linecolor1);
$book->{'dd'}=$dd;
@ -250,11 +254,6 @@ if ($borrower) {
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
}
($pcolor eq $linecolor1) ? ($pcolor=$linecolor2) : ($pcolor=$linecolor1);
$book->{'dd'}=$dd;
$book->{'tcolor'}=$pcolor;
push @realprevissues,$book
}
}
# actually print the page!
@ -323,8 +322,6 @@ $template->param(
flaginfotable => $flaginfotable,
CHARGES => $flags->{'CHARGES'},
amountold => $amountold,
todayissues => \@realtodayissues,
previssues => \@realprevissues,
);
if ($branchcookie) {