From c101d517bb429d61889a056d25154b54c2e2ade2 Mon Sep 17 00:00:00 2001 From: tipaul Date: Mon, 7 Jul 2003 14:46:55 +0000 Subject: [PATCH] *** empty log message *** --- circ/circulation.pl | 31 ++++++++++++++----------------- 1 file changed, 14 insertions(+), 17 deletions(-) diff --git a/circ/circulation.pl b/circ/circulation.pl index 7238e922c9..187ddef781 100755 --- a/circ/circulation.pl +++ b/circ/circulation.pl @@ -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="$dd\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="$dd\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="$dd\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) { -- 2.39.5