From 093c8db99b055715cb666260943cdd941bd0d522 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Mon, 7 Jan 2002 17:48:11 +0000 Subject: [PATCH] * mml.el (mml-preview): Bind gnus-original-article-buffer because article-decode-group-name uses it. Bind gnus-article-prepare-hook because bbdb may use it. --- lisp/ChangeLog | 6 ++++++ lisp/mml.el | 3 ++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 393a9daac..d909612a1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2002-01-07 ShengHuo ZHU + + * mml.el (mml-preview): Bind gnus-original-article-buffer because + article-decode-group-name uses it. Bind gnus-article-prepare-hook + because bbdb may use it. + 2002-01-07 TSUCHIYA Masatoshi * nneething.el (nneething-request-article): When a non-text file diff --git a/lisp/mml.el b/lisp/mml.el index 725756b75..b51223d30 100644 --- a/lisp/mml.el +++ b/lisp/mml.el @@ -941,7 +941,8 @@ If RAW, don't highlight the article." (erase-buffer) (mm-disable-multibyte) (insert s))) - (let ((gnus-newsgroup-charset (car message-posting-charset))) + (let ((gnus-newsgroup-charset (car message-posting-charset)) + gnus-article-prepare-hook gnus-original-article-buffer) (run-hooks 'gnus-article-decode-hook) (let ((gnus-newsgroup-name "dummy")) (gnus-article-prepare-display)))) -- 2.34.1