Index: openacs-4/packages/dotlrn/dotlrn.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/dotlrn.info,v
diff -u -r1.35 -r1.36
--- openacs-4/packages/dotlrn/dotlrn.info	22 Jan 2002 00:13:09 -0000	1.35
+++ openacs-4/packages/dotlrn/dotlrn.info	22 Jan 2002 03:37:49 -0000	1.36
@@ -250,7 +250,7 @@
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="clubs_pretty_name"  default="Club" description="used everywhere in the ui"/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="clubs_pretty_plural"  default="Clubs" description="used everywhere in the ui"/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="dotlrn_main_portlet_pretty_name"  default="Groups" description="The pretty name for the dotlrn main portlet (aka &quot;My Groups&quot;)"/>
-            <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="user_wsp_page_names"  default="Calendar, My Files" description="a csv list of the other pages to create on the user wsp by default"/>
+            <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="user_wsp_page_names"  description="a csv list of the other pages to create on the user wsp by default"/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="user_wsp_first_page_name"  default="MySpace" description="The name of the first (default) page for a user's workspace page (e.g. MySloanSpace)"/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="class_first_page_name"  default="Class Info" description="the first page's pretty name"/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="class_admin_first_page_name"  default="Class Admin" description="just that"/>
Index: openacs-4/packages/dotlrn/tcl/dotlrn-main-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-main-portlet-procs.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/dotlrn/tcl/dotlrn-main-portlet-procs.tcl	22 Jan 2002 01:34:24 -0000	1.16
+++ openacs-4/packages/dotlrn/tcl/dotlrn-main-portlet-procs.tcl	22 Jan 2002 03:37:49 -0000	1.17
@@ -45,7 +45,10 @@
         @creation-date Nov 2001
     } {
         # Tell portal to add this element to the page
-        set element_id [portal::add_element -page_id $page_id $portal_id [my_name]]
+        set element_id [portal::add_element \
+                -page_id $page_id \
+                -force_region 2 \
+                $portal_id [my_name]]
 
         return $element_id
     }
Index: openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl	22 Jan 2002 01:34:24 -0000	1.15
+++ openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl	22 Jan 2002 03:37:49 -0000	1.16
@@ -61,19 +61,19 @@
                 }
 
                 # manually switch back to the first page 
+                set page_id [portal::get_page_id -portal_id $portal_id -sort_key 0]
+
                 portal::set_current_page -portal_id $portal_id \
-                        -page_id [portal::get_page_id -portal_id $portal_id \
-                        -sort_key 0]
+                        -page_id $page_id
                 
                 # aks test adding applets on new pages
-                
                 # make a test page to the wsp
                 # add -layout_id later
                 # set page_id [portal::page_create -portal_id $portal_id \
                 #        -pretty_name "test new add applet" \
                 #        -portal_id $portal_id]
-                # dotlrn_main_portlet::add_self_to_page -page_id $page_id $portal_id {}
-
+                 dotlrn_main_portlet::add_self_to_page -page_id $page_id \
+                         $portal_id {}
                 # end test
 
                 # Update the user and set the portal page correctly