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 -N -r1.78.2.3 -r1.78.2.4
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	11 Apr 2008 21:35:18 -0000	1.78.2.3
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	12 Apr 2008 17:04:46 -0000	1.78.2.4
@@ -452,7 +452,7 @@
             mime::finalize $tokens -subordinates all
 
             set eh [util_list_to_ns_set $extraheaders]
-            ns_sendmail $to_addr $sender_addr $subject $packaged $eh [join $bcc_addr ","]
+            ns_sendmail $to_addr $from_addr $subject $packaged $eh [join $bcc_addr ","]
 
         } else {