Index: openacs-4/packages/contacts/www/message-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/message-ae.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/contacts/www/message-ae.tcl	3 Feb 2006 17:34:29 -0000	1.8
+++ openacs-4/packages/contacts/www/message-ae.tcl	18 Feb 2006 09:32:30 -0000	1.9
@@ -25,7 +25,7 @@
 	}
     }
     item_not_yours -requires {item_id} {
-	if { ![permission::permission_p -object_id [ad_conn package_id] -privilege "admin"] } {
+	if { ![permission::permission_p -object_id $item_id -privilege "write"] } {
 	    set user_id [ad_conn user_id]
 	    if { ![db_0or1row message_exists_p { select 1 from contact_messages where item_id = :item_id and owner_id = :user_id}] } {
 		if { [db_0or1row message_exists_p { select 1 from contact_messages where item_id = :item_id} ] } {