summaryrefslogtreecommitdiff
path: root/lisp/gnus/deuglify.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/gnus/deuglify.el')
-rw-r--r--lisp/gnus/deuglify.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/gnus/deuglify.el b/lisp/gnus/deuglify.el
index 35b53af724d..2fdc34e3e18 100644
--- a/lisp/gnus/deuglify.el
+++ b/lisp/gnus/deuglify.el
@@ -299,8 +299,12 @@ 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)
+ (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)))