Mercurial > emacs

changeset 33768:8d6dc71efabb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(message-send-news): Use buffer-substring-no-properties.
author ShengHuo ZHU <zsh@cs.rochester.edu>
date Wed, 22 Nov 2000 16:37:04 +0000
parents 398962ea0dfd
children 7596dea75d6b
files lisp/gnus/ChangeLog lisp/gnus/message.el
diffstat 2 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Wed Nov 22 16:34:53 2000 +0000
+++ b/lisp/gnus/ChangeLog	Wed Nov 22 16:37:04 2000 +0000
@@ -5,6 +5,7 @@
 2000-11-22 ShengHuo ZHU  <zsh@cs.rochester.edu>
 
 	* message.el (message-send-mail): Use buffer-substring-no-properties.
+	(message-send-news): Ditto.
 
 2000-11-21  Stefan Monnier  <monnier@cs.yale.edu>
 
--- a/lisp/gnus/message.el	Wed Nov 22 16:34:53 2000 +0000
+++ b/lisp/gnus/message.el	Wed Nov 22 16:37:04 2000 +0000
@@ -2526,10 +2526,9 @@
 	      (buffer-disable-undo)
 	      (erase-buffer)
 	      ;; Avoid copying text props.
-	      (insert (format
-		       "%s" (save-excursion
-			      (set-buffer messbuf)
-			      (buffer-string))))
+	      (insert (with-current-buffer messbuf
+			(buffer-substring-no-properties 
+			 (point-min) (point-max))))
 	      (message-encode-message-body)
 	      ;; Remove some headers.
 	      (save-restriction