Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl	9 Aug 2002 18:39:29 -0000	1.9
+++ openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl	4 Dec 2002 09:50:08 -0000	1.10
@@ -32,6 +32,7 @@
 
 set admin_p [dotlrn::user_can_admin_community_p -user_id $user_id -community_id $community_id]
 set read_private_data_p [dotlrn::user_can_read_private_data_p -user_id $user_id]
+set spam_p [dotlrn::user_can_spam_community_p -user_id [ad_get_user_id] -community_id $community_id]
 
 # Get all users for this community, including role
 template::util::list_of_ns_sets_to_multirow \