summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2001-11-25 17:45:36 +0000
committerRichard M. Stallman <rms@gnu.org>2001-11-25 17:45:36 +0000
commit92dfd10c1f4ad23aed4c36d0b6ec825f98fc8305 (patch)
tree3c39cd0b8c906235bc2a4145c96a9a4dbc543f7b
parent0baffc68914cc886f3307c61e5a3e500c7804468 (diff)
downloademacs-92dfd10c1f4ad23aed4c36d0b6ec825f98fc8305.tar.gz
Simplify previous change.
-rw-r--r--lisp/ChangeLog12
-rw-r--r--lisp/mail/smtpmail.el4
2 files changed, 10 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 25b5fd8b761..178b10669af 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,12 @@
-2001-11-25 Simon Josefsson <jas@extundo.com>
+2001-11-25 Richard M. Stallman <rms@gnu.org>
+
+ * language/devan-util.el: Comment out parts of the file
+ which apparently are garbled.
+
+2001-11-25 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
* mail/smtpmail.el (smtpmail-deduce-address-list): Don't use
- insert-string. Suggested by Pavel@Janik.cz (Pavel Jan,Bm(Bk).
+ insert-string.
2001-11-25 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
@@ -44,7 +49,8 @@
2001-11-24 Richard M. Stallman <rms@gnu.org>
* startup.el (command-line-1): Don't do startup screen
- if a subprocess is running.
+ if a subprocess is running. Call the startup screen buffer
+ "GNU Emacs". Make a special mode-line-format for it.
* net/browse-url.el (browse-url-galeon-new-window-is-tab): New var.
(browse-url-galeon): Use that variable.
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index b696c327fd8..83ffa5d44bc 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -873,9 +873,7 @@ This is relative to `smtpmail-queue-dir'.")
(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