aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNick Roberts2004-05-24 18:14:13 +0000
committerNick Roberts2004-05-24 18:14:13 +0000
commit9f438d80644943fa78ee767eeb7cd391dfc1c2bc (patch)
tree68e59fffbd6a28c2dad50babd5e699207bb1c4d9
parent00da1cc51dd7145f54b58e8bfa0950d3baaf711d (diff)
downloademacs-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.el6
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