(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:
parent
83a96b4d54
commit
8005142f86
2 changed files with 7 additions and 1 deletions
|
@ -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
|
||||
|
|
|
@ -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)))
|
||||
|
|
Loading…
Add table
Reference in a new issue