Index: openacs-4/packages/calendar/www/view-week-display-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-week-display-oracle.xql,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/calendar/www/view-week-display-oracle.xql	15 May 2007 20:14:21 -0000	1.7
+++ openacs-4/packages/calendar/www/view-week-display-oracle.xql	26 Aug 2008 22:35:12 -0000	1.8
@@ -14,6 +14,12 @@
         from dual
 </querytext>
 </fullquery>
+	
+<partialquery name="dow">
+<querytext>
+   , to_char(to_date(:start_date, 'YYYY-MM-DD'), 'D') as day_of_the_week
+</querytext>
+</partialquery>
 
 <fullquery name="select_week_info">
 <querytext>
Index: openacs-4/packages/calendar/www/view-week-display-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-week-display-postgresql.xql,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/calendar/www/view-week-display-postgresql.xql	12 Mar 2004 13:45:34 -0000	1.11
+++ openacs-4/packages/calendar/www/view-week-display-postgresql.xql	26 Aug 2008 22:35:12 -0000	1.12
@@ -14,6 +14,12 @@
         from     dual
 </querytext>
 </fullquery>
+	
+<partialquery name="dow">
+<querytext>
+   , extract(dow from start_date) as day_of_week
+</querytext>
+</partialquery>
 
 <fullquery name="select_week_items">
 <querytext>
@@ -22,8 +28,7 @@
          coalesce(e.name, a.name) as name,
          coalesce(e.status_summary, a.status_summary) as status_summary,
          e.event_id as item_id,
-         (to_date(start_date,:ansi_date_format)  - to_date(:first_weekday_of_the_week_tz,
-         :ansi_date_format)) as day_of_week,
+         extract(dow from start_date) as day_of_week,
          cals.calendar_id,
 	 cals.calendar_name,
          cit.type as item_type
Index: openacs-4/packages/calendar/www/view-week-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-week-display.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/calendar/www/view-week-display.tcl	7 Oct 2007 22:36:55 -0000	1.20
+++ openacs-4/packages/calendar/www/view-week-display.tcl	26 Aug 2008 22:35:12 -0000	1.21
@@ -111,7 +111,7 @@
 set order_by_clause " order by to_char(start_date, 'J'), to_char(start_date,'HH24:MI')"
 set interval_limitation_clause [db_map dbqd.calendar.www.views.week_interval_limitation]
 set additional_limitations_clause ""
-set additional_select_clause " , (to_date(start_date,'YYYY-MM-DD HH24:MI:SS')  - to_date(:first_weekday_of_the_week_tz,         'YYYY-MM-DD HH24:MI:SS')) as day_of_week"
+set additional_select_clause [db_map dow]
 if { [exists_and_not_null cal_system_type] } {
     append additional_limitations_clause " and system_type = :cal_system_type "
 }