[Emacs-diffs] master 9f58ed1: Don't highlight article if gnus-visual-p is nil (bug#32706)

[Katsumi Yamaoka]

branch: master
commit 9f58ed156974f6345a85da419c57c4235f549f2a
Author: Katsumi Yamaoka <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>

    Don't highlight article if gnus-visual-p is nil (bug#32706)
    
    * lisp/gnus/deuglify.el (gnus-outlook-display-article-buffer):
    Don't highlight article if gnus-visual-p is nil (bug#32706).
---
 lisp/gnus/deuglify.el | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/lisp/gnus/deuglify.el b/lisp/gnus/deuglify.el
index d2bc87c..b09f897 100644
--- a/lisp/gnus/deuglify.el
+++ b/lisp/gnus/deuglify.el
@@ -299,8 +299,14 @@ It is run after `gnus-article-prepare-hook'."
     ;; it. Calling `gnus-article-prepare-display' on an already
     ;; prepared article removes all MIME parts.  I'm unsure whether
     ;; this is a bug or not.
-    (gnus-article-highlight t)
-    (gnus-treat-article nil)
+    (when (gnus-visual-p 'article-highlight 'highlight)
+      (gnus-article-highlight t))
+    (save-excursion
+      (save-restriction
+       (widen)
+       (article-goto-body)
+       (narrow-to-region (point) (point-max))
+       (gnus-treat-article nil)))
     (gnus-run-hooks 'gnus-article-prepare-hook
                    'gnus-outlook-display-hook)))