Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 10 Nov 2001 21:44:52 -0000 1.7 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 26 Nov 2001 22:36:28 -0000 1.8 @@ -71,12 +71,21 @@ # FIXME: Set up permissions on this folder + # non-member page stuff # Get non member page_id set non_member_page_id [dotlrn_community::get_community_non_members_page_id $community_id] # Make file storage available public-folder only at community non-member page fs_portlet::add_self_to_page $non_member_page_id $package_id $public_folder_id + # portal template stuff + # get the portal_template_id by callback + set pt_id [dotlrn_community::get_portal_template_id $community_id] + + # set up the DS for the portal template + fs_portlet::make_self_available $pt_id + fs_portlet::add_self_to_page $pt_id $package_id + # return the package_id return $package_id }