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.10.2.1 -r1.10.2.2 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl 26 Nov 2003 16:22:00 -0000 1.10.2.1 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl 21 Feb 2004 02:36:51 -0000 1.10.2.2 @@ -31,7 +31,7 @@ set community_id $config(community_id) 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 read_private_data_p [dotlrn::user_can_read_private_data_p -user_id $user_id -object_id $community_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