From: yamaoka Date: Fri, 1 Oct 1999 11:08:21 +0000 (+0000) Subject: (gnus-bug): Use text/plain for the snooped environment part. X-Git-Tag: t-gnus-6_13_2-01~3 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ae3e7dcb2b19197956d1a5b86daa2b7fc8748683;p=elisp%2Fgnus.git- (gnus-bug): Use text/plain for the snooped environment part. --- 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 "")))