From df9cc8ba934b912ec7aed932703935a46245ebaa Mon Sep 17 00:00:00 2001
From: tonnesen <tonnesen>
Date: Tue, 3 Sep 2002 22:35:50 +0000
Subject: [PATCH] Fixed typo.

---
 C4/Acquisitions.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Acquisitions.pm b/C4/Acquisitions.pm
index 42412a2669..802c7b6207 100644
--- a/C4/Acquisitions.pm
+++ b/C4/Acquisitions.pm
@@ -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