summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/ChangeLog4
-rw-r--r--lisp/gnus/message.el6
2 files changed, 6 insertions, 4 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 69b561c13ab..595c39a49f9 100644
--- 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 f0c4d34e3a9..d47636873c7 100644
--- 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