Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.31 -r1.32
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	1 Dec 2001 23:34:55 -0000	1.31
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	3 Dec 2001 02:51:27 -0000	1.32
@@ -254,6 +254,7 @@
 	    set admin_segment_id [rel_segments_new $community_id dotlrn_admin_rel "Admins of $community_name"]
 
 	    # Grant permissions
+	    ad_permission_grant $member_segment_id $community_id read
 	    ad_permission_grant $member_segment_id $community_id write
 	    ad_permission_grant $admin_segment_id $community_id admin
 	}