From ae3e7dcb2b19197956d1a5b86daa2b7fc8748683 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 1 Oct 1999 11:08:21 +0000 Subject: [PATCH] (gnus-bug): Use text/plain for the snooped environment part. --- lisp/gnus-msg.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index 13a1a51..ca8dc13 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -952,10 +952,11 @@ If YANK is non-nil, include the original article." (stringp nntp-server-type)) (insert nntp-server-type)) (insert "\n\n\n\n\n") - (save-excursion - (set-buffer (gnus-get-buffer-create " *gnus environment info*")) - (gnus-debug)) - (insert "<#part type=application/x-emacs-lisp buffer=\" *gnus environment info*\" disposition=inline description=\"User settings\"><#/part>") + (let (mime-content-types) + (mime-edit-insert-tag "text" "plain" "; type=emacs-lisp")) + (insert (with-temp-buffer + (gnus-debug) + (buffer-string))) (goto-char (point-min)) (search-forward "Subject: " nil t) (message ""))) -- 1.7.10.4