diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2005-04-16 16:03:29 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2005-04-16 16:03:29 +0000 |
| commit | fbcaad36b832a6894896dfbc0562bacd3f41c599 (patch) | |
| tree | 0421f06491fe7f10f1c6c03958d7248a8e41e5fe /lisp/emulation | |
| parent | ccb9871da323d805da12934a4be39442ae0852c6 (diff) | |
| download | emacs-fbcaad36b832a6894896dfbc0562bacd3f41c599.tar.gz | |
(cua-global-mark-face): Add special case
for displays supporting a high number of colors.
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/cua-base.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index d267afc741d..77e8f636931 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el @@ -405,7 +405,8 @@ and after the region marked by the rectangle to search." :group 'cua) (defface cua-global-mark-face - '((((class color)) :foreground "black" :background "yellow") + '((((min-colors 88)(class color)) :foreground "black" :background "yellow1") + (((class color)) :foreground "black" :background "yellow") (t :bold t)) "*Font used by CUA for highlighting the global mark." :group 'cua) |