Index: openacs-4/packages/contacts/www/contact-groups.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/contact-groups.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/contacts/www/contact-groups.tcl 7 Jun 2005 07:45:40 -0000 1.3 +++ openacs-4/packages/contacts/www/contact-groups.tcl 15 Feb 2006 10:06:36 -0000 1.4 @@ -8,6 +8,7 @@ {party_id:integer,notnull} {return_url "./"} } +contact::require_visiblity -party_id $party_id set user_id [ad_conn user_id] set package_id [ad_conn package_id]