Mercurial > emacs
changeset 73418:6018dbb5896c
Comment change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 18 Oct 2006 11:11:32 +0000 |
| parents | 5eddbe565062 |
| children | 8ae73e613065 |
| files | lisp/mail/smtpmail.el |
| diffstat | 1 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/smtpmail.el Wed Oct 18 11:02:31 2006 +0000 +++ b/lisp/mail/smtpmail.el Wed Oct 18 11:11:32 2006 +0000 @@ -541,6 +541,17 @@ (decoded (base64-decode-string challenge)) (hash (rfc2104-hash 'md5 64 16 passwd decoded)) (response (concat (smtpmail-cred-user cred) " " hash)) + ;; Osamu Yamane <yamane@green.ocn.ne.jp>: + ;; SMTP auth fails because the SMTP server identifies + ;; only the first part of the string (delimited by + ;; new line characters) as a response from the + ;; client, and the rest as distinct commands. + + ;; In my case, the response string is 80 characters + ;; long. Without the no-line-break option for + ;; base64-encode-sting, only the first 76 characters + ;; are taken as a response to the server, and the + ;; authentication fails. (encoded (base64-encode-string response t))) (smtpmail-send-command process (format "%s" encoded)) (if (or (null (car (setq ret (smtpmail-read-response process))))