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 -r1.20 -r1.21
--- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	23 Jan 2002 05:09:32 -0000	1.20
+++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	23 Jan 2002 06:29:31 -0000	1.21
@@ -170,7 +170,9 @@
 	# Add the portlet here
         if { $workspace_portal_id != "" } {
             calendar_portlet::make_self_available $workspace_portal_id
+
             set element_id  [calendar_portlet::add_self_to_page \
+                    -page_id [portal::get_page_id -portal_id $portal_id -page_name [get_user_default_page]] \
                     $workspace_portal_id \
                     $calendar_id]
         }
@@ -198,7 +200,6 @@
 
 	# Call the portal element to be added correctly
 	calendar_portlet::add_self_to_page \
-                -page_id [portal::get_page_id -portal_id $portal_id -page_name [get_user_default_page]] \
                 $portal_id $g_cal_id
 
 	# Now for the user workspace