/[emacs]/emacs/lisp/progmodes/gdb-ui.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/gdb-ui.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.54 by miles, Sun Mar 20 01:49:32 2005 UTC revision 1.55 by miles, Tue Mar 22 05:05:50 2005 UTC
# Line 1161  static char *magick[] = { Line 1161  static char *magick[] = {
1161         "\x3c\x7e\xff\xff\xff\xff\x7e\x3c"))         "\x3c\x7e\xff\xff\xff\xff\x7e\x3c"))
1162    
1163  (defface breakpoint-enabled  (defface breakpoint-enabled
1164    '((t    ;; On ttys, we don't inherit from the `fringe' face because that
1165       :inherit fringe    ;; 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))
1168       :weight bold       :weight bold
1169       :foreground "red"))       :foreground "red")
1170        (t
1171         :weight bold
1172         :foreground "red"
1173         :inherit fringe))
1174    "Face for enabled breakpoint icon in fringe."    "Face for enabled breakpoint icon in fringe."
1175    :group 'gud)    :group 'gud)
1176  ;; compatibility alias for old name  ;; compatibility alias for old name
1177  (put 'breakpoint-enabled-bitmap-face 'face-alias 'breakpoint-enabled)  (put 'breakpoint-enabled-bitmap-face 'face-alias 'breakpoint-enabled)
1178    
1179  (defface breakpoint-disabled  (defface breakpoint-disabled
1180    '((t    ;; We use different values of grey for different background types,
1181       :inherit fringe    ;; so that on low-color displays it will end up as something visible
1182       :foreground "grey60"))    ;; if it has to be approximated.  On ttys, we don't inherit from the
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))
1187         :foreground "grey60")
1188        (((type tty) (background light))
1189         :foreground "grey40")
1190        (((background dark))
1191         :foreground "grey60"
1192         :inherit fringe)
1193        (((background light))
1194         :foreground "grey40"
1195         :inherit fringe))
1196    "Face for disabled breakpoint icon in fringe."    "Face for disabled breakpoint icon in fringe."
1197    :group 'gud)    :group 'gud)
1198  ;; compatibility alias for old name  ;; compatibility alias for old name

Legend:
Removed from v.1.54  
changed lines
  Added in v.1.55

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26