From 4e79364d43dc6d44cc80232f5524aa2c6b2b1446 Mon Sep 17 00:00:00 2001
From: arensb <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.20.1