From b9ca4c2b330a6c91485c86ad74f9cb68c59be717 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Wed, 22 Nov 2000 16:37:04 +0000 Subject: [PATCH] (message-send-news): Use buffer-substring-no-properties. --- lisp/gnus/ChangeLog | 1 + lisp/gnus/message.el | 7 +++---- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 2728b386d79..b3ad58aa4b2 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -5,6 +5,7 @@ 2000-11-22 ShengHuo ZHU * message.el (message-send-mail): Use buffer-substring-no-properties. + (message-send-news): Ditto. 2000-11-21 Stefan Monnier diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index d47636873c7..e18b4b9477c 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -2526,10 +2526,9 @@ to find out how to use this." (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 -- 2.39.5