Index: openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl,v
diff -u -N -r1.54 -r1.55
--- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	15 May 2002 20:32:55 -0000	1.54
+++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	17 May 2002 19:20:16 -0000	1.55
@@ -109,7 +109,7 @@
                 -portlet_name [calendar_portlet::get_my_name]
         ]
 
-        # add the "full calendar" portlet to the commnuity's "calendar" page,
+        # add the "full calendar" portlet to the community's "calendar" page,
         # similar to the same thing on a user's wsp. use the get_user_def_page
         set page_name [get_user_default_page]
         if {[dotlrn_community::dummy_comm_p -community_id $community_id]} {
@@ -147,6 +147,17 @@
         portal::set_element_param \
                 $element_id "scoped_p" "f"
 
+        # Add the Class Schedule Portlet
+        set element_id [calendar_list_portlet::add_self_to_page \
+                -portal_id $portal_id \
+                -page_name $page_name \
+                -calendar_id $group_calendar_id
+        ]
+
+        # This is not scoped, because we are only seeing one group calendar
+        portal::set_element_param \
+                $element_id "scoped_p" "f"
+
         # Add the admin portlet, too
         set admin_portal_id [dotlrn_community::get_admin_portal_id -community_id $community_id]