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.86.6.1 -r1.86.6.2 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 28 May 2004 14:19:43 -0000 1.86.6.1 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 19 Jun 2004 17:41:22 -0000 1.86.6.2 @@ -519,13 +519,18 @@ site_node_object_map::new -object_id $public_folder_id -node_id $node_id - # The public folder is available to all dotLRN Full Access Users + # The public folder is available to all dotLRN Full Access Users. Admins can + # write to it but can't delete it by default, because the non-member portlet + # expects it to exist. + + permission::set_not_inherit -object_id $public_folder_id + permission::grant -party_id $admins -object_id $public_folder_id -privilege write + set dotlrn_public [dotlrn::get_users_rel_segment_id] permission::grant \ - -party_id $dotlrn_public \ - -object_id $public_folder_id \ - -privilege read - + -party_id $dotlrn_public \ + -object_id $public_folder_id \ + -privilege read # # now to the cloning #