From ada9b7c9cecdbc2dd6cbd08553d8f83cb80f793a Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 29 Oct 2020 12:38:13 +0100 Subject: [PATCH] Tweak previous article-treat-ansi-sequences fix * lisp/gnus/gnus-art.el (article-treat-ansi-sequences): Redo the previous fix to avoid a compilation warning (bug#44299). --- lisp/gnus/gnus-art.el | 7 ++++--- 1 file 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. -- 2.39.2