Index: openacs-4/packages/contacts/www/message.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/message.tcl,v
diff -u -r1.24 -r1.25
--- openacs-4/packages/contacts/www/message.tcl	3 Jan 2006 22:14:55 -0000	1.24
+++ openacs-4/packages/contacts/www/message.tcl	15 Feb 2006 10:06:36 -0000	1.25
@@ -48,7 +48,9 @@
 	lappend party_ids $party_id
     }
 }
-
+foreach id $party_ids {
+    contact::require_visiblity -party_id $id
+}
 set party_count [llength $party_ids]
 set title "[_ contacts.Messages]"
 set user_id [ad_conn user_id]