From: morioka <morioka>
Date: Mon, 12 Jan 1998 18:04:20 +0000 (+0000)
Subject: (smtpmail-send-it): Don't generate and kill `smtp-address-buffer' for
X-Git-Tag: gnus-6_7-tomo-199811302358~239
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6f235985675bd9f82a36c28de2da3f7636e70864;p=elisp%2Fgnus.git-

(smtpmail-send-it): Don't generate and kill `smtp-address-buffer' for
`smtp-deduce-address-list'.
---

diff --git a/lisp/smtpmail.el b/lisp/smtpmail.el
index e10e03d..ee82d03 100644
--- a/lisp/smtpmail.el
+++ b/lisp/smtpmail.el
@@ -200,12 +200,10 @@ This is relative to `smtpmail-queue-dir'.")
 	  ;;
 	  ;;
 	  ;;
-	  (setq smtp-address-buffer (generate-new-buffer "*smtp-mail*"))
 	  (setq smtp-recipient-address-list
 		(or resend-to-addresses
 		    (smtp-deduce-address-list tembuf (point-min) delimline)))
-	  (kill-buffer smtp-address-buffer)
-	  
+
 	  (smtp-do-bcc delimline)
 	  ; Send or queue
 	  (if (not smtpmail-queue-mail)