Index: openacs-4/packages/calendar/www/cal-weekview.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-weekview.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/calendar/www/cal-weekview.tcl 6 Sep 2001 06:30:43 -0000 1.2 +++ openacs-4/packages/calendar/www/cal-weekview.tcl 7 Sep 2001 02:49:18 -0000 1.3 @@ -176,11 +176,11 @@ while {$i < $num_hour_rows} { set sql " - select to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY')+:i, 'DAY') + select to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY')+$i, 'DAY') as weekday, - to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY')+:i, 'YYYY-MM-DD') + to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY')+$i, 'YYYY-MM-DD') as pretty_date, - to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY')+:i, 'J') + to_char(next_day(to_date(:current_date, 'yyyy-mm-dd')-7, 'SUNDAY')+$i, 'J') as start_date from dual "