Simplify previous change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 25b5fd8b7614aeee0a06dec87b81b8e4e94d6657..178b10669afc29443b5296656503443252707894 100644 (file)
--- 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\e,Bm\e(Bk  <Pavel@Janik.cz>
 
        * mail/smtpmail.el (smtpmail-deduce-address-list): Don't use
-       insert-string.  Suggested by Pavel@Janik.cz (Pavel Jan\e,Bm\e(Bk).
+       insert-string.
 
 2001-11-25  Pavel Jan\e,Bm\e(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 b696c327fd8bd45c83a09c1e62ecc6b1ea9fd0aa..83ffa5d44bcaeced93e435a3f47e08c6cbc46876 100644 (file)
--- 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