From 6ad94db9aa66b78b6b71e0e74f3fd38743e05670 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 6 Feb 2001 23:11:25 +0000 Subject: [PATCH] Synch with Oort Gnus. --- lisp/ChangeLog | 5 +++++ lisp/message.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9c32d25..a527e8a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-02-06 09:00:00 ShengHuo ZHU + + * message.el (message-encode-message-body): Don't insert + Content-Type if it is inside a mail. + 2001-02-06 02:00:00 ShengHuo ZHU * gnus-xmas.el (gnus-xmas-article-menu-add): Add diff --git a/lisp/message.el b/lisp/message.el index 20a1ba6..d5e4291 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -5707,7 +5707,8 @@ regexp varstr." (when lines (insert lines)) (setq content-type-p - (re-search-backward "^Content-Type:" nil t))) + (or mml-boundary + (re-search-backward "^Content-Type:" nil t)))) (save-restriction (message-narrow-to-headers-or-head) (message-remove-first-header "Content-Type") -- 1.7.10.4