mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-27 10:54:40 +00:00
Code Issues Releases Activity

(smtpmail-read-response): Goto smtpmail-read-point

Browse Source
This commit is contained in:
Richard M. Stallman 1996-06-18 22:43:32 +00:00
parent b21dc7615e
commit c8d16dbd12
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/mail/smtpmail.el
View File

@ -345,8 +345,8 @@ don't define this value.")
; (setq response-continue t)
; (setq return-value '(nil ""))
(goto-char smtpmail-read-point)
(while response-continue
(goto-char smtpmail-read-point)
(while (not (search-forward "\r\n" nil t))
(accept-process-output process)
(goto-char smtpmail-read-point))