Index: openacs-4/packages/dotlrn/www/member-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/member-add.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/dotlrn/www/member-add.tcl	4 Dec 2002 09:51:04 -0000	1.9
+++ openacs-4/packages/dotlrn/www/member-add.tcl	24 Jul 2004 08:34:10 -0000	1.10
@@ -26,6 +26,10 @@
     {referer "one-community-admin"}
 }
 
+#prevent this page from being called when it is not allowed
+# i.e.   AllowManageMembership 0
+dotlrn_portlet::is_allowed -parameter managemembership
+
 set search_text [string trim $search_text]
 set community_id [dotlrn_community::get_community_id]