Index: openacs-4/packages/acs-subsite/www/shared/send-email.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/send-email.tcl,v diff -u -r1.6 -r1.6.2.1 --- openacs-4/packages/acs-subsite/www/shared/send-email.tcl 10 Jan 2007 21:22:10 -0000 1.6 +++ openacs-4/packages/acs-subsite/www/shared/send-email.tcl 3 Apr 2008 11:35:29 -0000 1.6.2.1 @@ -21,7 +21,7 @@ db_1row user_to_info { *SQL* } set from [email_image::get_email -user_id $user_id] -ad_form -name send-email -export {sendto $sendto} -form { +ad_form -name send-email -export {sendto return_url} -form { {from:text(text),optional {label "From:"} {html {{disabled ""} {size 40}}}