Index: openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl	1 Dec 2001 23:16:41 -0000	1.10
+++ openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl	3 Dec 2001 20:34:47 -0000	1.11
@@ -73,6 +73,13 @@
 	bboard_portlet::make_self_available $pt_id
 	bboard_portlet::add_self_to_page $pt_id $package_id
 
+	# Set up permissions for basic members (Admins inherit no problem)
+	set members [dotlrn_admin_rel::get_rel_segment_id -community_id $community_id -rel_type dotlrn_member_rel]
+	ad_permission_grant $members $package_id bboard_read_forum
+	ad_permission_grant $members $package_id bboard_read_category
+	ad_permission_grant $members $package_id bboard_read_message
+	ad_permission_grant $members $package_id bboard_create_message
+
 	# return the package_id
 	return $package_id
     }
@@ -99,7 +106,7 @@
 	For one-time init stuff
 	
     } {
-
+	
     }
 
 
Index: openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl	3 Dec 2001 11:37:20 -0000	1.9
+++ openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl	3 Dec 2001 20:34:58 -0000	1.10
@@ -65,6 +65,9 @@
 	faq_portlet::make_self_available $pt_id
 	faq_portlet::add_self_to_page $pt_id $package_id
 
+	# Set up some permissions
+	# for FAQ, it's all good as is
+
 	# return the package_id
 	return $package_id
     }
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.11 -r1.12
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	1 Dec 2001 23:16:53 -0000	1.11
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	3 Dec 2001 20:35:05 -0000	1.12
@@ -77,7 +77,14 @@
 	creation_ip => :ip);
 	end;"]
 
-	# FIXME: Set up permissions on this folder
+	# Set up permissions on these folders
+	# The public folder is available to all dotLRN Full Access Users
+	# The root folder is available only to community members
+	set members [dotlrn_community::get_rel_segment_id -community_id $community_id -rel_type dotlrn_member_rel]
+	ad_permission_grant $members $folder_id read
+
+	set dotlrn_public [dotlrn::get_full_users_rel_segment_id]
+	ad_permission_grant $dotlrn_public $public_folder_id read
 	
 	# non-member page stuff
 	# Get non member portal_id