Mercurial > emacs
changeset 19234:55924d8a5b9e
(viper-replace-overlay-pixmap)
(viper-search-face-pixmap): Variables deleted.
(viper-replace-overlay-face, viper-search-face): Use "gray3" explicitly.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 09 Aug 1997 02:23:32 +0000 |
| parents | 520a7d40d75c |
| children | 759e45894579 |
| files | lisp/emulation/viper-init.el |
| diffstat | 1 files changed, 2 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/viper-init.el Sat Aug 09 02:11:29 1997 +0000 +++ b/lisp/emulation/viper-init.el Sat Aug 09 02:23:32 1997 +0000 @@ -692,15 +692,6 @@ ;;; Face-saving tricks -(defcustom viper-replace-overlay-pixmap "gray3" - "Pixmap to use for search face on non-color displays." - :type 'string - :group 'viper) -(defcustom viper-search-face-pixmap "gray3" - "Pixmap to use for search face on non-color displays." - :type 'string - :group 'viper) - (defun viper-hide-face (face) (if (and (viper-has-face-support-p) viper-emacs-p) (add-to-list 'facemenu-unlisted-faces face))) @@ -729,7 +720,7 @@ (defface viper-search-face '((((class color)) (:foreground "Black" :background "khaki")) - (t (:underline t :stipple viper-search-face-pixmap))) + (t (:underline t :stipple "gray3"))) "*Face used to flash out the search pattern." :group 'viper-highlighting) ;; An internal variable. Viper takes the face from here. @@ -755,7 +746,7 @@ (defface viper-replace-overlay-face '((((class color)) (:foreground "Black" :background "darkseagreen2")) - (t (:underline t :stipple viper-replace-overlay-face-pixmap))) + (t (:underline t :stipple "gray3"))) "*Face for highlighting replace regions on a window display." :group 'viper-highlighting) ;; An internal variable. Viper takes the face from here.