2001-07-09 23:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

[gnus] / lisp / gnus-msg.el

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 51dfb9e..c6f0a4f 100644 (file)
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -1017,6 +1017,7 @@ If YANK is non-nil, include the original article."
     (let (text)
       (save-excursion
        (set-buffer (gnus-get-buffer-create " *gnus environment info*"))
+        (erase-buf)
        (gnus-debug)
        (setq text (buffer-string)))
       (insert "<#part type=application/x-emacs-lisp disposition=inline description=\"User settings\">\n" text "\n<#/part>"))