diff options
| author | Nick Roberts | 2004-05-24 18:14:13 +0000 |
|---|---|---|
| committer | Nick Roberts | 2004-05-24 18:14:13 +0000 |
| commit | 9f438d80644943fa78ee767eeb7cd391dfc1c2bc (patch) | |
| tree | 68e59fffbd6a28c2dad50babd5e699207bb1c4d9 | |
| parent | 00da1cc51dd7145f54b58e8bfa0950d3baaf711d (diff) | |
| download | emacs-9f438d80644943fa78ee767eeb7cd391dfc1c2bc.tar.gz emacs-9f438d80644943fa78ee767eeb7cd391dfc1c2bc.zip | |
(gdb-breakpoints-mode, gdb-frames-mode)
(gdb-locals-mode): Check gud-minor-mode in gud-comint-buffer.
| -rw-r--r-- | lisp/progmodes/gdb-ui.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index 5fca67dcb80..b376c380e98 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el | |||
| @@ -1170,7 +1170,7 @@ static char *magick[] = { | |||
| 1170 | (setq mode-name "Breakpoints") | 1170 | (setq mode-name "Breakpoints") |
| 1171 | (use-local-map gdb-breakpoints-mode-map) | 1171 | (use-local-map gdb-breakpoints-mode-map) |
| 1172 | (setq buffer-read-only t) | 1172 | (setq buffer-read-only t) |
| 1173 | (if (eq gud-minor-mode 'gdba) | 1173 | (if (with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gdba)) |
| 1174 | (gdb-invalidate-breakpoints) | 1174 | (gdb-invalidate-breakpoints) |
| 1175 | (gdbmi-invalidate-breakpoints))) | 1175 | (gdbmi-invalidate-breakpoints))) |
| 1176 | 1176 | ||
| @@ -1290,7 +1290,7 @@ static char *magick[] = { | |||
| 1290 | (setq buffer-read-only t) | 1290 | (setq buffer-read-only t) |
| 1291 | (use-local-map gdb-frames-mode-map) | 1291 | (use-local-map gdb-frames-mode-map) |
| 1292 | (font-lock-mode -1) | 1292 | (font-lock-mode -1) |
| 1293 | (if (eq gud-minor-mode 'gdba) | 1293 | (if (with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gdba)) |
| 1294 | (gdb-invalidate-frames) | 1294 | (gdb-invalidate-frames) |
| 1295 | (gdbmi-invalidate-frames))) | 1295 | (gdbmi-invalidate-frames))) |
| 1296 | 1296 | ||
| @@ -1490,7 +1490,7 @@ static char *magick[] = { | |||
| 1490 | (setq mode-name "Locals") | 1490 | (setq mode-name "Locals") |
| 1491 | (setq buffer-read-only t) | 1491 | (setq buffer-read-only t) |
| 1492 | (use-local-map gdb-locals-mode-map) | 1492 | (use-local-map gdb-locals-mode-map) |
| 1493 | (if (eq gud-minor-mode 'gdba) | 1493 | (if (with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gdba)) |
| 1494 | (gdb-invalidate-locals) | 1494 | (gdb-invalidate-locals) |
| 1495 | (gdbmi-invalidate-locals))) | 1495 | (gdbmi-invalidate-locals))) |
| 1496 | 1496 | ||