Index: openacs-4/packages/calendar/www/view-month-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-month-display.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/calendar/www/view-month-display.tcl	10 Jan 2004 00:19:03 -0000	1.13
+++ openacs-4/packages/calendar/www/view-month-display.tcl	21 Jan 2004 11:41:11 -0000	1.14
@@ -104,7 +104,11 @@
 set current_day $first_julian_date_of_month
 
 # Set the necessary variables for the unified calendar query in views.xql.
-set interval_limitation_clause " to_timestamp(:first_date_of_month_system,'YYYY-MM-DD HH24:MI:SS')  and      to_timestamp(:last_date_in_month_system, 'YYYY-MM-DD HH24:MI:SS')"
+if {[string match [db_type] "postgresql"]} {
+    set interval_limitation_clause " to_timestamp(:first_date_of_month_system,'YYYY-MM-DD HH24:MI:SS')  and      to_timestamp(:last_date_in_month_system, 'YYYY-MM-DD HH24:MI:SS')"
+} else {
+    set interval_limitation_clause " to_date(:first_date_of_month_system,'YYYY-MM-DD HH24:MI:SS')  and      to_date(:last_date_in_month_system, 'YYYY-MM-DD HH24:MI:SS')"
+}
 set order_by_clause " order by ansi_start_date, ansi_end_date"
 set additional_limitations_clause ""
 set additional_select_clause ""