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.87 -r1.88
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	2 Apr 2004 01:44:53 -0000	1.87
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	29 Jun 2004 10:18:08 -0000	1.88
@@ -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
         #