Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v diff -u -r1.20 -r1.21 --- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl 15 Jun 2005 16:03:38 -0000 1.20 +++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl 15 Jun 2005 17:08:11 -0000 1.21 @@ -820,7 +820,7 @@ mime::finalize $multi_token -subordinates all set message_id [generate_message_id] -# sendmail -from_addr $from_addr -sendlist [get_address_array -addresses $to_addr] -msg $packaged -valid_email_p t -message_id $message_id -package_id $package_id + sendmail -from_addr $from_addr -sendlist [get_address_array -addresses $to_addr] -msg $packaged -valid_email_p t -message_id $message_id -package_id $package_id if {[empty_string_p $package_id]} { set package_id [apm_package_id_from_key "acs-mail-lite"]