Index: openacs-4/packages/calendar/www/view-list-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-list-display.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/calendar/www/view-list-display.tcl	10 Jan 2004 00:22:13 -0000	1.19
+++ openacs-4/packages/calendar/www/view-list-display.tcl	21 Jan 2004 11:41:11 -0000	1.20
@@ -77,8 +77,11 @@
 set last_pretty_start_date ""
 # Loop through the events, and add them
 
-set interval_limitation_clause " to_timestamp(:start_date,'YYYY-MM-DD HH24:MI:SS')  and      to_timestamp(:end_date, 'YYYY-MM-DD HH24:MI:SS')"
-
+if {[string match [db_type] "postgresql"]} {
+    set interval_limitation_clause " to_timestamp(:start_date,'YYYY-MM-DD HH24:MI:SS')  and      to_timestamp(:end_date, 'YYYY-MM-DD HH24:MI:SS')"
+} else {
+    set interval_limitation_clause " to_date(:start_date,'YYYY-MM-DD HH24:MI:SS')  and      to_date(:end_date, 'YYYY-MM-DD HH24:MI:SS')"
+}
 set order_by_clause " order by $sort_by"
 set additional_limitations_clause ""