From 8372fe38fdbeb3aa31aa4a4b76e6d8f2b78545da Mon Sep 17 00:00:00 2001
From: genji <genji>
Date: Mon, 29 Jan 2007 09:28:07 +0000
Subject: [PATCH] removed warnings

---
 circ/circulation.pl | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/circ/circulation.pl b/circ/circulation.pl
index eca5f45cf7..734ed25af6 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -85,9 +85,7 @@ $env{'queue'}=$printer;
 
 my @datearr = localtime(time());
 # 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;
-
+my $todaysdate = (1900+$datearr[5]).sprintf ("%0.2d", ($datearr[4]+1)).sprintf ("%0.2d", ($datearr[3]))
 # check and see if we should print
  if ($barcode eq ''  && $print eq 'maybe'){
  	$print = 'yes';
@@ -201,7 +199,6 @@ if ($borrower) {
 		my $issuedate = $issueslist->{$it}->{'timestamp'};
 		$issuedate = substr($issuedate, 0, 10);
 		$issuedate=~s/-//g;
-		warn $issuedate;
 		if ($todaysdate == $issuedate) {
 			push @todaysissues, $issueslist->{$it};
 		} else {