Index: openacs-4/packages/acs-templating/tcl/date-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/date-procs.tcl,v
diff -u -N -r1.27.2.2 -r1.27.2.3
--- openacs-4/packages/acs-templating/tcl/date-procs.tcl	26 Mar 2004 09:55:14 -0000	1.27.2.2
+++ openacs-4/packages/acs-templating/tcl/date-procs.tcl	20 May 2004 16:38:16 -0000	1.27.2.3
@@ -90,6 +90,7 @@
     @return the number of days in a month, accounting for leap years
     LOOKATME: IS THE LEAP YEAR CODE CORRECT ?
 } {
+  set month [string trimleft $month 0]
   variable month_data
   set month_desc $month_data($month)
   set days [lindex $month_desc 2]