Index: openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql 15 Sep 2001 07:25:27 -0000 1.4 +++ openacs-4/packages/calendar/tcl/cal-item-procs-postgresql.xql 17 Sep 2001 06:46:09 -0000 1.5 @@ -105,8 +105,8 @@ select time_interval__edit ( :interval_id, - to_date(:start_date,:date_format), - to_date(:end_date,:date_format) + timestamp(:start_date), + timestamp(:end_date) ) Index: openacs-4/packages/calendar/tcl/calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/calendar-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/calendar/tcl/calendar-procs.tcl 15 Sep 2001 07:26:54 -0000 1.2 +++ openacs-4/packages/calendar/tcl/calendar-procs.tcl 17 Sep 2001 06:49:49 -0000 1.3 @@ -30,6 +30,14 @@ set hours [lindex $event_time 3] set minutes [lindex $event_time 1] + if {$month < 10} { + set month "0$month" + } + + if {$day < 10} { + set day "0$day" + } + if {$hours < 10} { set hours "0$hours" } Index: openacs-4/packages/calendar/www/cal-monthview.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-monthview.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/calendar/www/cal-monthview.tcl 15 Sep 2001 07:14:32 -0000 1.3 +++ openacs-4/packages/calendar/www/cal-monthview.tcl 17 Sep 2001 06:43:05 -0000 1.4 @@ -130,7 +130,7 @@ -set row_html [dt_widget_month -calendar_details $set_id] +set row_html [dt_widget_month -calendar_details $set_id -date $date] ad_return_template Index: openacs-4/packages/calendar/www/cal-weekview-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-weekview-postgresql.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/calendar/www/cal-weekview-postgresql.xql 15 Sep 2001 07:14:32 -0000 1.3 +++ openacs-4/packages/calendar/www/cal-weekview-postgresql.xql 17 Sep 2001 06:49:49 -0000 1.4 @@ -10,7 +10,7 @@ as day_of_the_week, to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY'),'YYYY-MM-DD') as sunday_of_the_week, - to_char(next_day(to_date(:current_date, 'yyyy-mm-dd'), 'Saturday'),'YYYY-MM-DD') + to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')+7, 'Saturday'),'YYYY-MM-DD') as saturday_of_the_week from dual