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.33 -r1.34 --- openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl 2 Apr 2002 06:13:47 -0000 1.33 +++ openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl 16 Apr 2002 13:53:52 -0000 1.34 @@ -104,10 +104,11 @@ db_transaction { if {[string equal $access_level "full"] == 1} { - # Create a portal page for this user + # Create a portal page for this user, + # the template for the user WSP is create in dotlrn::init set portal_id [portal::create \ + -template_id [dotlrn_community::get_type_template_id -community_type "user_workspace"] \ -name "Your dotLRN Workspace" \ - -csv_list [ad_parameter user_wsp_page_names] \ $user_id ]