Index: openacs-4/packages/contacts/www/message.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/message.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/contacts/www/message.tcl	16 Jun 2005 08:55:33 -0000	1.5
+++ openacs-4/packages/contacts/www/message.tcl	16 Jun 2005 23:31:17 -0000	1.6
@@ -42,6 +42,7 @@
 set context [list $title]
 
 set recipients [list]
+set parties_new [list]
 foreach party_id $party_ids {
     
     # Check if the party has a valid e-mail address