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.7 -r1.8
--- openacs-4/packages/contacts/www/message-ae.tcl	31 Jan 2006 11:49:22 -0000	1.7
+++ openacs-4/packages/contacts/www/message-ae.tcl	3 Feb 2006 17:34:29 -0000	1.8
@@ -28,7 +28,9 @@
 	if { ![permission::permission_p -object_id [ad_conn package_id] -privilege "admin"] } {
 	    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}] } {
-		ad_complain [_ contacts.lt_The_message_id_specified_does_not_belong_to_you]
+		if { [db_0or1row message_exists_p { select 1 from contact_messages where item_id = :item_id} ] } {
+		    ad_complain [_ contacts.lt_The_message_id_specified_does_not_belong_to_you]
+		}
 	    }
 	}
     }