Mercurial > emacs
changeset 47117:c6c0e4cc9d0a
(smtpmail-via-smtp): Delete process buffer
unless s-debug-info is enabled.
author | Simon Josefsson <jas@extundo.com> |
---|---|
date | Fri, 30 Aug 2002 10:31:02 +0000 |
parents | 733fb94b0b6a |
children | 215a73bfc592 |
files | lisp/mail/smtpmail.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/smtpmail.el Fri Aug 30 06:06:15 2002 +0000 +++ b/lisp/mail/smtpmail.el Fri Aug 30 10:31:02 2002 +0000 @@ -749,7 +749,9 @@ ; (>= (car response-code) 400)) ; (throw 'done nil) ; ) - (delete-process process)))))) + (delete-process process) + (unless smtpmail-debug-info + (kill-buffer process-buffer))))))) (defun smtpmail-process-filter (process output)