cl-smtp-cvs

Download

cl-smtp-cvs@common-lisp.net

August 2010

1 participants
2 discussions

[cl-smtp-cvs] CVS cl-smtp
by jidzikowski 23 Aug '10

23 Aug '10

Update of /project/cl-smtp/cvsroot/cl-smtp In directory cl-net:/tmp/cvs-serv10002 Modified Files: cl-smtp.lisp Log Message: use variable *x-mailer* without any additional text --- /project/cl-smtp/cvsroot/cl-smtp/cl-smtp.lisp 2010/06/11 09:48:35 1.17 +++ /project/cl-smtp/cvsroot/cl-smtp/cl-smtp.lisp 2010/08/23 15:18:34 1.18 @@ -18,7 +18,7 @@ (in-package :cl-smtp) -(defparameter *x-mailer* (format nil "(~A ~A)" +(defparameter *x-mailer* (format nil "cl-smtp (~A ~A)" (lisp-implementation-type) (lisp-implementation-version))) @@ -430,7 +430,7 @@ (write-to-smtp stream (format nil "Subject: ~A" (rfc2045-q-encode-string subject :external-format external-format))) - (write-to-smtp stream (format nil "X-Mailer: cl-smtp~A" + (write-to-smtp stream (format nil "X-Mailer: ~A" (rfc2045-q-encode-string *x-mailer* :external-format external-format))) (when reply-to

1 0

[cl-smtp-cvs] CVS cl-smtp
by jidzikowski 23 Aug '10

23 Aug '10

Update of /project/cl-smtp/cvsroot/cl-smtp In directory cl-net:/tmp/cvs-serv9847 Modified Files: index.html Log Message: typing error --- /project/cl-smtp/cvsroot/cl-smtp/index.html 2010/06/21 09:06:27 1.4 +++ /project/cl-smtp/cvsroot/cl-smtp/index.html 2010/08/23 15:16:18 1.5 @@ -18,8 +18,8 @@ CL-SMTP is a simple lisp Networking Library that provides SMTP client protocol, supported LOGIN and PLAIN authentication methods. New Version [20100621.1] Rewrite base64-encode-file in attachments.lisp, fixed wrap at column -and add #\Return#\Newline after each column, ignore keyword buffer-size. -Fixed string-to-base64-string allegro part in cl-smtp.lisp (wrap-at-column nil). +and add #\Return#\Newline after each column, ignore keyword buffer-size. +Fixed string-to-base64-string allegro part in cl-smtp.lisp (wrap-at-column nil). Fixed finish-smtp-mail in cl-smtp, not use fresh-line on stream, send #\Return#\Newline. Add test for base64-encode-file. @@ -71,7 +71,7 @@ <td class="working">working</td> </tr> <tr> - <td>OpemMCL</td> + <td>OpenMCL</td> <td class="working">working</td> </tr> </table>

1 0