Index: openacs-4/packages/contacts/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/index.tcl,v diff -u -N -r1.30 -r1.31 --- openacs-4/packages/contacts/www/index.tcl 25 Jun 2007 17:29:24 -0000 1.30 +++ openacs-4/packages/contacts/www/index.tcl 27 Jun 2007 02:51:40 -0000 1.31 @@ -118,11 +118,11 @@ if { $search_id ne "" && $contacts_total_count > 0 } { if {[contact::group::mapped_p -group_id $search_id]} { - set recipient "[group::title -group_id $search_id]" + set recipient [contact::group::name -group_id $search_id] } else { - set recipient "[contact::search::title -search_id $search_id]" + set recipient [contact::search::title -search_id $search_id] } - set label "[_ contacts.Mail_group]" + set label "[_ contacts.Mail_recipient]" append form_elements { {mail_merge_group:text(submit) {label $label} {value "1"}}