From 109a7709758bc3b74c925ea4db88f02b0b62977b Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Thu, 5 Apr 2007 07:14:51 +0000 Subject: [PATCH] (breakpoint-disabled): Tweak face (again) for low-color displays. --- lisp/progmodes/gdb-ui.el | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index b598f2de1f7..4dbc9893f61 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el @@ -1771,10 +1771,15 @@ static char *magick[] = { :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) -- 2.39.5