# HG changeset patch # User Eli Zaretskii # Date 1077901389 0 # Node ID 88158cece6fb9f83cf70ec685b5e101a061da8b4 # Parent efe95a1385e170f75761b5140fceefb3b0766484 (isearch, isearch-lazy-highlight-face): Use `min-colors'. diff -r efe95a1385e1 -r 88158cece6fb lisp/isearch.el --- a/lisp/isearch.el Fri Feb 27 17:01:55 2004 +0000 +++ b/lisp/isearch.el Fri Feb 27 17:03:09 2004 +0000 @@ -2128,26 +2128,30 @@ :group 'isearch) (defface isearch - '((((type tty pc) (class color)) - (:background "magenta4" :foreground "cyan1")) - (((class color) (background light)) + '((((class color) (min-colors 88) (background light)) ;; The background must not be too dark, for that means ;; the character is hard to see when the cursor is there. (:background "magenta2" :foreground "lightskyblue1")) - (((class color) (background dark)) + (((class color) (min-colors 88) (background dark)) (:background "palevioletred2" :foreground "brown4")) + (((class color) (min-colors 16)) + (:background "magenta4" :foreground "cyan1")) + (((class color) (min-colors 8)) + (:background "magenta4" :foreground "cyan1")) (t (:inverse-video t))) "Face for highlighting Isearch matches." :group 'isearch-faces) (defvar isearch 'isearch) (defface isearch-lazy-highlight-face - '((((type tty pc) (class color)) + '((((class color) (min-colors 88) (background light)) + (:background "paleturquoise")) + (((class color) (min-colors 88) (background dark)) + (:background "paleturquoise4")) + (((class color) (min-colors 16)) (:background "turquoise3")) - (((class color) (background light)) - (:background "paleturquoise")) - (((class color) (background dark)) - (:background "paleturquoise4")) + (((class color) (min-colors 8)) + (:background "turquoise3")) (t (:underline t))) "Face for lazy highlighting of Isearch matches other than the current one." :group 'isearch-faces)