Update of /project/cl-smtp/cvsroot/cl-smtp In directory cl-net:/tmp/cvs-serv20432

Modified Files: attachments.lisp Log Message: fixed error when send more than 1 attachment - add a blank line between attachments

--- /project/cl-smtp/cvsroot/cl-smtp/attachments.lisp 2007/11/05 19:58:24 1.6 +++ /project/cl-smtp/cvsroot/cl-smtp/attachments.lisp 2010/04/20 10:10:58 1.7 @@ -164,4 +164,5 @@ (print-debug (format nil "~% Eof is ~a~%" eof?)) (when (or (zerop buffer-size) eof?) + (write-blank-line sock) (return))))))))