changeset 41497:608d7b92d289

Simplify previous change.
author Richard M. Stallman <rms@gnu.org>
date Sun, 25 Nov 2001 17:43:47 +0000
parents 9c8e073f49db
children d5de86d3c2c3
files lisp/mail/smtpmail.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/smtpmail.el	Sun Nov 25 17:43:04 2001 +0000
+++ b/lisp/mail/smtpmail.el	Sun Nov 25 17:43:47 2001 +0000
@@ -873,9 +873,7 @@
 			  (mail-strip-quoted-names (buffer-substring this-line this-line-end))))
 	    )
 	  (erase-buffer)
-	  (insert " ")
-	  (insert simple-address-list)
-	  (insert "\n")
+	  (insert " " simple-address-list "\n")
 	  (subst-char-in-region (point-min) (point-max) 10 ?  t);; newline --> blank
 	  (subst-char-in-region (point-min) (point-max) ?, ?  t);; comma   --> blank
 	  (subst-char-in-region (point-min) (point-max)  9 ?  t);; tab     --> blank