Index: openacs-4/packages/dotlrn/www/members.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members.tcl,v
diff -u -r1.19.6.1 -r1.19.6.2
--- openacs-4/packages/dotlrn/www/members.tcl	1 Jul 2004 13:45:32 -0000	1.19.6.1
+++ openacs-4/packages/dotlrn/www/members.tcl	19 Jul 2004 18:39:39 -0000	1.19.6.2
@@ -30,6 +30,10 @@
     ad_returnredirect "[dotlrn::get_url]"
 }
 
+#prevent this page from being called when it is not allowed
+# i.e.   AllowManageMembership 0
+dotlrn_portlet::is_allowed -parameter managemembership
+
 set context [list [list "one-community-admin" [_ dotlrn.Admin]] [_ dotlrn.Manage_Members]]
 set community_id [dotlrn_community::get_community_id]
 set portal_id [dotlrn_community::get_portal_id -community_id $community_id]