diff options
| author | Kim F. Storm | 2005-03-22 23:08:57 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2005-03-22 23:08:57 +0000 |
| commit | 5f9e3a263619a4dcfd661898568d60b4bddba1d9 (patch) | |
| tree | 9914f68e7ce64603aa8e52ee3992fa15a5fcdcbf | |
| parent | 8df0ffbe5f3aa87b7fd02358b856ca23c764792c (diff) | |
| download | emacs-5f9e3a263619a4dcfd661898568d60b4bddba1d9.tar.gz emacs-5f9e3a263619a4dcfd661898568d60b4bddba1d9.zip | |
(breakpoint-enabled, breakpoint-disabled):
Don't inherit from fringe face (now happens automatically).
| -rw-r--r-- | lisp/progmodes/gdb-ui.el | 17 |
1 files changed, 4 insertions, 13 deletions
diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index 89a69aaf2d6..2a714e84b9a 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el | |||
| @@ -1161,16 +1161,12 @@ static char *magick[] = { | |||
| 1161 | "\x3c\x7e\xff\xff\xff\xff\x7e\x3c")) | 1161 | "\x3c\x7e\xff\xff\xff\xff\x7e\x3c")) |
| 1162 | 1162 | ||
| 1163 | (defface breakpoint-enabled | 1163 | (defface breakpoint-enabled |
| 1164 | ;; On ttys, we don't inherit from the `fringe' face because that | ||
| 1165 | ;; doesn't seem to do the right thing in some cases (?), whereas | ||
| 1166 | ;; it's required on non-tty displays to get the background right. | ||
| 1167 | '((((type tty)) | 1164 | '((((type tty)) |
| 1168 | :weight bold | 1165 | :weight bold |
| 1169 | :foreground "red") | 1166 | :foreground "red") |
| 1170 | (t | 1167 | (t |
| 1171 | :weight bold | 1168 | :weight bold |
| 1172 | :foreground "red" | 1169 | :foreground "red")) |
| 1173 | :inherit fringe)) | ||
| 1174 | "Face for enabled breakpoint icon in fringe." | 1170 | "Face for enabled breakpoint icon in fringe." |
| 1175 | :group 'gud) | 1171 | :group 'gud) |
| 1176 | ;; compatibility alias for old name | 1172 | ;; compatibility alias for old name |
| @@ -1179,20 +1175,15 @@ static char *magick[] = { | |||
| 1179 | (defface breakpoint-disabled | 1175 | (defface breakpoint-disabled |
| 1180 | ;; We use different values of grey for different background types, | 1176 | ;; We use different values of grey for different background types, |
| 1181 | ;; so that on low-color displays it will end up as something visible | 1177 | ;; so that on low-color displays it will end up as something visible |
| 1182 | ;; if it has to be approximated. On ttys, we don't inherit from the | 1178 | ;; if it has to be approximated. |
| 1183 | ;; `fringe' face because that doesn't seem to do the right thing in | ||
| 1184 | ;; some cases (?), whereas it's required on non-tty displays to get | ||
| 1185 | ;; the background right. | ||
| 1186 | '((((type tty) (background dark)) | 1179 | '((((type tty) (background dark)) |
| 1187 | :foreground "grey60") | 1180 | :foreground "grey60") |
| 1188 | (((type tty) (background light)) | 1181 | (((type tty) (background light)) |
| 1189 | :foreground "grey40") | 1182 | :foreground "grey40") |
| 1190 | (((background dark)) | 1183 | (((background dark)) |
| 1191 | :foreground "grey60" | 1184 | :foreground "grey60") |
| 1192 | :inherit fringe) | ||
| 1193 | (((background light)) | 1185 | (((background light)) |
| 1194 | :foreground "grey40" | 1186 | :foreground "grey40")) |
| 1195 | :inherit fringe)) | ||
| 1196 | "Face for disabled breakpoint icon in fringe." | 1187 | "Face for disabled breakpoint icon in fringe." |
| 1197 | :group 'gud) | 1188 | :group 'gud) |
| 1198 | ;; compatibility alias for old name | 1189 | ;; compatibility alias for old name |