From: Dave Love <fx@gnu.org>
Date: Sun, 12 Mar 2000 15:29:12 +0000 (+0000)
Subject: (info-lookup): Use display-color-p.
X-Git-Tag: emacs-pretest-21.0.90~4671
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=141d2f67cdecd47f7c570c63e5e0badf6449e940;p=emacs.git

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

diff --git a/lisp/info-look.el b/lisp/info-look.el
index dc9cb0bec81..3ae7b701a12 100644
--- 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))