Index: openacs-4/packages/contacts/www/person-groups-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/person-groups-ae.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/contacts/www/person-groups-ae.tcl 7 Jun 2005 07:45:40 -0000 1.3 +++ openacs-4/packages/contacts/www/person-groups-ae.tcl 15 Feb 2006 10:06:36 -0000 1.4 @@ -9,6 +9,7 @@ {person_id:integer,optional} } +contact::require_visiblity -party_id $person_id if { [exists_and_not_null person_id] } { set admin_user_url [acs_community_member_admin_url -user_id $person_id]