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.1 -r1.2
--- openacs-4/packages/calendar/www/cal-monthview.tcl	23 Apr 2001 23:09:38 -0000	1.1
+++ openacs-4/packages/calendar/www/cal-monthview.tcl	6 Sep 2001 06:30:43 -0000	1.2
@@ -28,8 +28,8 @@
 
 set sql "
 select   to_char(start_date, 'j') as start_date,
-         nvl(e.name, a.name) as name,
-         nvl(e.description, a.description) as description,
+         coalesce(e.name, a.name) as name,
+         coalesce(e.description, a.description) as description,
          e.event_id as item_id
 from     acs_activities a,
          acs_events e,
@@ -45,6 +45,25 @@
          where   on_which_calendar = :calendar_id
          )
 "
+#set sql "
+#select   to_char(start_date, 'j') as start_date,
+#         nvl(e.name, a.name) as name,
+#         nvl(e.description, a.description) as description,
+#         e.event_id as item_id
+#from     acs_activities a,
+#         acs_events e,
+#         timespans s,
+#         time_intervals t
+#where    e.timespan_id = s.timespan_id
+#and      s.interval_id = t.interval_id
+#and      e.activity_id = a.activity_id
+#and      e.event_id
+#in       (
+#         select  cal_item_id
+#         from    cal_items
+#         where   on_which_calendar = :calendar_id
+#         )
+#"
 
 set mlist ""
 set set_id [ns_set new month_items]