From ad249c82d8743878846ca004c447a073bddb7075 Mon Sep 17 00:00:00 2001 From: sushi Date: Wed, 7 Jun 2006 03:30:44 +0000 Subject: [PATCH] Merging Katipo changes. --- acqui/basket.pl | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/acqui/basket.pl b/acqui/basket.pl index ead9d7e6d6..078815cd5d 100755 --- a/acqui/basket.pl +++ b/acqui/basket.pl @@ -82,6 +82,8 @@ my $line_total; # total of each line my $sub_total; # total of line totals my $gist; # GST my $grand_total; # $subttotal + $gist +my $toggle = 0; + # my $line_total_est; # total of each line my $sub_total_est; # total of line totals @@ -100,6 +102,14 @@ for ( my $i = 0 ; $i < $count ; $i++ ) { $sub_total += $line_total; $qty_total += $results[$i]->{'quantity'}; my %line; + if ( $toggle == 0 ) { + $line{color} = '#EEEEEE'; + $toggle = 1; + } + else { + $line{color} = 'white'; + $toggle = 0; + } $line{ordernumber} = $results[$i]->{'ordernumber'}; $line{publishercode} = $results[$i]->{'publishercode'}; $line{isbn} = $results[$i]->{'isbn'}; -- 2.39.2