Index: openacs-4/packages/acs-mail-lite/tcl/complex-send-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/Attic/complex-send-procs.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/acs-mail-lite/tcl/complex-send-procs.tcl	5 Dec 2007 08:26:21 -0000	1.18
+++ openacs-4/packages/acs-mail-lite/tcl/complex-send-procs.tcl	6 Dec 2007 18:26:46 -0000	1.19
@@ -376,7 +376,7 @@
 	set tokens [concat $tokens $attachment_tokens]
 
 	# We have at least one attachment so change the type to multipart/mixed
-	if {[llenght $attachment_tokens] > 0} {
+	if {[llength $attachment_tokens] > 0} {
 	    set multi_token_type "multipart/mixed"
 	}