diff options
| author | Joakim Verona | 2012-03-07 09:41:43 +0100 |
|---|---|---|
| committer | Joakim Verona | 2012-03-07 09:41:43 +0100 |
| commit | 1e3a41b29b5bd263cde651d9f23517c8a29155dc (patch) | |
| tree | 521dbc7d21eff3acefe3e74e2585f49923924534 /lisp/progmodes | |
| parent | 28485daaf752ff5264ed2f6a32ec15588beaa929 (diff) | |
| parent | 3266b56f817e562638f0ab7ca36fe5e01a44f831 (diff) | |
| download | emacs-1e3a41b29b5bd263cde651d9f23517c8a29155dc.tar.gz emacs-1e3a41b29b5bd263cde651d9f23517c8a29155dc.zip | |
upstream
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/gdb-mi.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el index 0c45c3f5e5d..8ea255e49dd 100644 --- a/lisp/progmodes/gdb-mi.el +++ b/lisp/progmodes/gdb-mi.el | |||
| @@ -2397,15 +2397,15 @@ HANDLER-NAME handler uses customization of CUSTOM-DEFUN. See | |||
| 2397 | (gdb-table-add-row table | 2397 | (gdb-table-add-row table |
| 2398 | (list | 2398 | (list |
| 2399 | (bindat-get-field breakpoint 'number) | 2399 | (bindat-get-field breakpoint 'number) |
| 2400 | type | 2400 | (or type "") |
| 2401 | (bindat-get-field breakpoint 'disp) | 2401 | (or (bindat-get-field breakpoint 'disp) "") |
| 2402 | (let ((flag (bindat-get-field breakpoint 'enabled))) | 2402 | (let ((flag (bindat-get-field breakpoint 'enabled))) |
| 2403 | (if (string-equal flag "y") | 2403 | (if (string-equal flag "y") |
| 2404 | (propertize "y" 'font-lock-face font-lock-warning-face) | 2404 | (propertize "y" 'font-lock-face font-lock-warning-face) |
| 2405 | (propertize "n" 'font-lock-face font-lock-comment-face))) | 2405 | (propertize "n" 'font-lock-face font-lock-comment-face))) |
| 2406 | (bindat-get-field breakpoint 'addr) | 2406 | (bindat-get-field breakpoint 'addr) |
| 2407 | (bindat-get-field breakpoint 'times) | 2407 | (or (bindat-get-field breakpoint 'times) "") |
| 2408 | (if (string-match ".*watchpoint" type) | 2408 | (if (and type (string-match ".*watchpoint" type)) |
| 2409 | (bindat-get-field breakpoint 'what) | 2409 | (bindat-get-field breakpoint 'what) |
| 2410 | (or pending at | 2410 | (or pending at |
| 2411 | (concat "in " | 2411 | (concat "in " |