Index: openacs-4/contrib/packages/project-manager/tcl/calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/tcl/Attic/calendar-procs.tcl,v diff -u -r1.1.2.5 -r1.1.2.6 --- openacs-4/contrib/packages/project-manager/tcl/calendar-procs.tcl 30 Aug 2004 18:19:13 -0000 1.1.2.5 +++ openacs-4/contrib/packages/project-manager/tcl/calendar-procs.tcl 8 Sep 2004 17:47:17 -0000 1.1.2.6 @@ -33,7 +33,7 @@ set month [lindex $date_list 1] set year [lindex $date_list 0] - set first_of_month_date "$year-$month-[dt_first_day_of_month $year $month]" + set first_of_month_date "$year-$month-01" set last_of_month_date "$year-$month-[dt_num_days_in_month $year $month]" set items [ns_set create] @@ -99,7 +99,7 @@ # Display stuff - set day_number_template "$day_template" + set day_number_template "$day_template" return [dt_widget_month -calendar_details $items -date $date \ -master_bgcolor black \