Mercurial > emacs
changeset 76955:1056094c2006
(breakpoint-disabled): Tweak face (again)
for low-color displays.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Thu, 05 Apr 2007 07:14:51 +0000 |
parents | b6d64a551715 |
children | db1ee7694773 |
files | lisp/progmodes/gdb-ui.el |
diffstat | 1 files changed, 9 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/gdb-ui.el Thu Apr 05 07:14:19 2007 +0000 +++ b/lisp/progmodes/gdb-ui.el Thu Apr 05 07:14:51 2007 +0000 @@ -1771,10 +1771,15 @@ :group 'gud) (defface breakpoint-disabled - ;; We use different values of grey for different background types, - ;; so that on low-color displays it will end up as something visible - ;; if it has to be approximated. - '((t :foreground "grey70")) + '((((class color) (min-colors 88)) :foreground "grey70") + ;; Ensure that on low-color displays that we end up something visible. + (((class color) (min-colors 8) (background light)) + :foreground "black") + (((class color) (min-colors 8) (background dark)) + :foreground "white") + (((type tty) (class mono)) + :inverse-video t) + (t :background "gray")) "Face for disabled breakpoint icon in fringe." :group 'gud)