Index: openacs-4/packages/contacts/www/message.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/message.adp,v diff -u -r1.9 -r1.10 --- openacs-4/packages/contacts/www/message.adp 1 Jul 2005 00:37:06 -0000 1.9 +++ openacs-4/packages/contacts/www/message.adp 1 Jul 2005 22:45:23 -0000 1.10 @@ -8,7 +8,10 @@ -@party_ids@ +@party_id@ + +

@error_message;noquote@

+
comment_add.comment Index: openacs-4/packages/contacts/www/message.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/message.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/contacts/www/message.tcl 1 Jul 2005 00:37:06 -0000 1.10 +++ openacs-4/packages/contacts/www/message.tcl 1 Jul 2005 22:45:23 -0000 1.11 @@ -39,7 +39,6 @@ } set party_count [llength $party_ids] - set title "[_ contacts.Messages]" set user_id [ad_conn user_id] set context [list $title] @@ -97,16 +96,19 @@ set invalid_recipients [join $invalid_recipients ", "] if { [llength $invalid_recipients] > 0 } { switch $message_type { - letter { - util_user_message -html -message [_ contacts.lt_You_cannot_send_a_letter_to_invalid_recipients] - } - email { - util_user_message -html -message [_ contacts.lt_You_cannot_send_an_email_to_invalid_recipients] - } - default { - util_user_message -html -message [_ contacts.lt_You_cannot_send_a_message_to_invalid_recipients] - } + letter { + set error_message [_ contacts.lt_You_cannot_send_a_letter_to_invalid_recipients] + } + email { + set error_message [_ contacts.lt_You_cannot_send_an_email_to_invalid_recipients] + } + default { + set error_message [_ contacts.lt_You_cannot_send_a_message_to_invalid_recipients] + } } + if { $party_ids != "" } { + util_user_message -html -message $error_message + } } if {[exists_and_not_null object_id]} {