From d3d2ea927c19aed1eb74d60066627f13a4bc27d5 Mon Sep 17 00:00:00 2001 From: Stephen Gildea Date: Sat, 1 Feb 2020 09:28:30 -0800 Subject: [PATCH] MH-E: alter content in mh-display-msg, not mh-show-mode * lisp/mh-e/mh-show.el (mh-display-msg, mh-show-mode): buffer-altering code formerly in mh-show-mode is moved to the location in mh-display-msg where mh-show-mode used to be called before the fix to MH-E bug #470 moved the call earlier. --- lisp/mh-e/mh-show.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/mh-e/mh-show.el b/lisp/mh-e/mh-show.el index 00f0908f99a..3c07d426b7d 100644 --- a/lisp/mh-e/mh-show.el +++ b/lisp/mh-e/mh-show.el @@ -234,6 +234,9 @@ Sets the current buffer to the show buffer." (mh-add-missing-mime-version-header) (setf (mh-buffer-data) (mh-make-buffer-data)) (mh-mime-display)) + (mh-show-unquote-From) + (mh-show-xface) + (mh-show-addr) ;; Header cleanup (goto-char (point-min)) (cond (clean-message-header @@ -840,9 +843,6 @@ See also `mh-folder-mode'. (mh-tool-bar-init :show)) (set (make-local-variable 'mail-header-separator) mh-mail-header-separator) (setq paragraph-start (default-value 'paragraph-start)) - (mh-show-unquote-From) - (mh-show-xface) - (mh-show-addr) (setq buffer-invisibility-spec '((vanish . t) t)) (set (make-local-variable 'line-move-ignore-invisible) t) (make-local-variable 'font-lock-defaults) -- 2.39.5