Mercurial > emacs

diff lisp/gnus/message.el @ 33748:2827e4066e08

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* message.el (message-send-mail): Use buffer-substring-no-properties.
author ShengHuo ZHU <zsh@cs.rochester.edu>
date Wed, 22 Nov 2000 14:27:40 +0000
parents a324254af725
children 8d6dc71efabb
line wrap: on
line diff
--- a/lisp/gnus/message.el	Wed Nov 22 14:27:38 2000 +0000
+++ b/lisp/gnus/message.el	Wed Nov 22 14:27:40 2000 +0000
@@ -2318,10 +2318,8 @@
 	  (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