mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(smtpmail-deduce-address-list): Don't use insert-string.

Browse source
This commit is contained in:
Pavel Janík 2001-11-25 15:11:22 +00:00
parent 9c7fce0505
commit fefed09d42
2 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2001-11-25 Simon Josefsson <jas@extundo.com>
* mail/smtpmail.el (smtpmail-deduce-address-list): Don't use
insert-string. Suggested by Pavel@Janik.cz (Pavel Jan,Bm(Bk).
2001-11-25 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
* play/snake.el (snake-mode): Remove make-local-hook.

6
lisp/mail/smtpmail.el
View file

@ -873,9 +873,9 @@ This is relative to `smtpmail-queue-dir'.")
(mail-strip-quoted-names (buffer-substring this-line this-line-end))))
)
(erase-buffer)
(insert-string " ")
(insert-string simple-address-list)
(insert-string "\n")
(insert " ")
(insert simple-address-list)
(insert "\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