Fixed typo.

This commit is contained in:
tonnesen 2002-09-03 22:35:50 +00:00
parent 0efeb8ac5e
commit df9cc8ba93
1 changed files with 1 additions and 1 deletions

View File

@ -343,7 +343,7 @@ sub bookfunds {
my ($day,$month,$year)=(localtime(time))[3,4,5];
$year+=1900;
$month++;
my $today=sprintf "%4d-%02d-%02d", $year, $monthm, $day;
my $today=sprintf "%4d-%02d-%02d", $year, $month, $day;
my $dbh=C4Connect;
my $query="Select * from aqbookfund,aqbudget where aqbookfund.bookfundid
=aqbudget.bookfundid