* message.el (message-send-mail): Use buffer-substring-no-properties.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 69b561c13abb53a092a2d9f7eeb01b2538d421b0..595c39a49f9ff25034bc9594f96c561993b258cb 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2000-11-22 ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * message.el (message-send-mail): Use buffer-substring-no-properties.
+
 2000-11-21  Stefan Monnier  <monnier@cs.yale.edu>
 
        * gnus-win.el (gnus-configure-windows): switch-to-buffer -> set-buffer.

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index f0c4d34e3a96df24fba808edc408a6c25cd8787e..d47636873c75dd028a5fa5fca9b45fc636d59845 100644 (file)
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -2318,10 +2318,8 @@ It should typically alter the sending method in some way or other."
          (set-buffer tembuf)
          (erase-buffer)
          ;; Avoid copying text props.
-         (insert (format
-                  "%s" (save-excursion
-                         (set-buffer mailbuf)
-                         (buffer-string))))
+         (insert (with-current-buffer mailbuf
+                   (buffer-substring-no-properties (point-min) (point-max))))
          ;; Remove some headers.
          (message-encode-message-body)
          (save-restriction