summaryrefslogtreecommitdiff
path: root/lisp/gnus
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2020-10-29 16:55:12 +0100
committerMichael Albinus <michael.albinus@gmx.de>2020-10-29 16:55:12 +0100
commitf5e080fb1f90f74cd43ff1fa46280a107fbf7757 (patch)
tree2208dc3d5ebb03906f71989be5c12849ccc1ab43 /lisp/gnus
parent1fb85fb138980ba82a4f99673a020586123b9bc9 (diff)
parentbe59466be711b573f7c9a9643af08bbfc05289f6 (diff)
downloademacs-f5e080fb1f90f74cd43ff1fa46280a107fbf7757.tar.gz
emacs-f5e080fb1f90f74cd43ff1fa46280a107fbf7757.tar.bz2
emacs-f5e080fb1f90f74cd43ff1fa46280a107fbf7757.zip
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs
Diffstat (limited to 'lisp/gnus')
-rw-r--r--lisp/gnus/gnus-art.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index f9a6dd64427..1efc1d6f7d9 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -2169,9 +2169,10 @@ MAP is an alist where the elements are on the form (\"from\" \"to\")."
(interactive)
(save-excursion
(when (article-goto-body)
- (let ((inhibit-read-only t))
- (ansi-color-apply-on-region (point) (point-max)))))
- (setq ansi-color-context-region nil))
+ (require 'ansi-color)
+ (let ((inhibit-read-only t)
+ (ansi-color-context-region nil))
+ (ansi-color-apply-on-region (point) (point-max))))))
(defun gnus-article-treat-unfold-headers ()
"Unfold folded message headers.