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.10.2.4 -r1.10.2.5
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	9 Sep 2004 22:29:50 -0000	1.10.2.4
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	27 Sep 2004 20:35:57 -0000	1.10.2.5
@@ -458,7 +458,7 @@
             if { [string equal [bounce_sendmail] "SMTP"] } {
                 ## Terminate body with a solitary period
                 foreach line [split $msg "\n"] { 
-                    if [string match . [strim trim $line]] {
+                    if {[string match . [string trim $line]]} {
                         append data .
                     }
                     append data "$line\r\n"