From 4e79364d43dc6d44cc80232f5524aa2c6b2b1446 Mon Sep 17 00:00:00 2001 From: arensb Date: Wed, 9 Oct 2002 14:29:39 +0000 Subject: [PATCH] Added some FIXME comments. --- circ/circulation.pl | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/circ/circulation.pl b/circ/circulation.pl index 5a2551b6e5..897530cb0a 100755 --- a/circ/circulation.pl +++ b/circ/circulation.pl @@ -30,8 +30,8 @@ use C4::Print; my %env; my $headerbackgroundcolor='#99cc33'; -my $circbackgroundcolor='#ffffcc'; -my $circbackgroundcolor='white'; # FIXME - Duplicate +my $circbackgroundcolor='#ffffcc'; # FIXME - Never used +my $circbackgroundcolor='white'; # FIXME - Never used my $linecolor1='#ffffcc'; my $linecolor2='white'; my $backgroundimage="/images/background-mem.gif"; @@ -61,8 +61,9 @@ $env{'printer'}=$printer; $env{'queue'}=$printer; my @datearr = localtime(time()); -my $tday = localtime(time()); -warn "today: $tday \n"; +my $tday = localtime(time()); # FIXME - Unused +#warn "today: $tday \n"; +# FIXME - Could just use POSIX::strftime("%Y%m%d", localtime); my $todaysdate = (1900+$datearr[5]).sprintf ("%0.2d", ($datearr[4]+1)).sprintf ("%0.2d", ($datearr[3])); #warn $todaysdate; -- 2.39.5