Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl	11 Feb 2002 05:00:52 -0000	1.2
+++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl	11 Feb 2002 19:33:57 -0000	1.3
@@ -59,11 +59,14 @@
 }
 
 if {$view == "list"} {
-    set cal_stuff "This will eventually just list the items for today"
+    set cal_stuff [calendar::list_display \
+            -item_template {<a href=calendar/?action=edit&cal_item_id=$item_id>$item</a>} \
+            -date $current_date \
+            -calendar_id_list $list_of_calendar_ids]
 }
 
 if {$view == "year"} {
-    set cal_stuff "yeah, this view is boring"
+    set cal_stuff ""
 }
 
 ad_return_template