(info-lookup): Use display-color-p.

diff --git a/lisp/info-look.el b/lisp/info-look.el
index dc9cb0bec8158eb4094ae904519bb51b29a39c05..3ae7b701a124f77580eb184ba97232ec0c2ab2b5 100644 (file)
--- a/lisp/info-look.el
+++ b/lisp/info-look.el
@@ -361,7 +361,7 @@ If optional argument QUERY is non-nil, query for the help mode."
                      (re-search-forward
                       (concat prefix (regexp-quote item) suffix))
                      (goto-char (match-beginning 0))
-                     (and window-system info-lookup-highlight-face
+                     (and (display-color-p) info-lookup-highlight-face
                           ;; Search again for ITEM so that the first
                           ;; occurence of ITEM will be highlighted.
                           (re-search-forward (regexp-quote item))