(isearch-highlight): Don't punt if the display

doesn't support colors, since isearch faces are defined for
monochrome displays as well.
This commit is contained in:
Eli Zaretskii 2001-01-28 13:13:00 +00:00
parent 83a96b4d54
commit 8005142f86
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,9 @@
2001-01-28 Eli Zaretskii <eliz@is.elta.co.il>
* isearch.el (isearch-highlight): Don't punt if the display
doesn't support colors, since isearch faces are defined for
monochrome displays as well.
2001-01-27 Sam Steingold <sds@gnu.org>
* shell.el (shell-write-history-on-exit): Make sure that we are in

View file

@ -1744,7 +1744,7 @@ If there is no completion possible, say so and continue searching."
(defvar isearch-overlay nil)
(defun isearch-highlight (beg end)
(unless (or (null search-highlight) (null (display-color-p)))
(unless (null search-highlight)
(cond (isearch-overlay
;; Overlay already exists, just move it.
(move-overlay isearch-overlay beg end (current-buffer)))