master ada9b7c: Tweak previous article-treat-ansi-sequences fix

[Lars Ingebrigtsen]

branch: master
commit ada9b7c9cecdbc2dd6cbd08553d8f83cb80f793a
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    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 f9a6dd6..1efc1d6 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.