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.85 -r1.86
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	18 Aug 2009 23:22:17 -0000	1.85
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	19 Aug 2009 11:26:23 -0000	1.86
@@ -499,7 +499,15 @@
         if { $cc_addr ne "" } {
             lappend headers_list [list CC [join $cc_addr ","]]
         }
+
         if { $bcc_addr ne ""} {
+
+            # BCC implementation in tcllib 1.8 to 1.11 is awkward. It
+            # sends the blind copy as an attachment, changes the From
+            # header replacing it with the originator, etc. So we use
+            # DCC instead which behaves as one would expect Bcc to
+            # behave.
+
             lappend headers_list [list DCC [join $bcc_addr ","]]
         }