# HG changeset patch
# User ShengHuo ZHU <zsh@cs.rochester.edu>
# Date 974911024 0
# Node ID 8d6dc71efabb148b9f15e11ea6085b67107bfd60
# Parent  398962ea0dfde6aedb538e1c56263765f341dafb
(message-send-news):  Use buffer-substring-no-properties.

diff -r 398962ea0dfd -r 8d6dc71efabb lisp/gnus/ChangeLog
--- 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>
 
diff -r 398962ea0dfd -r 8d6dc71efabb lisp/gnus/message.el
--- 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