summaryrefslogtreecommitdiff
path: root/lisp/progmodes
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2017-05-27 15:15:18 +0300
committerEli Zaretskii <eliz@gnu.org>2017-05-27 15:15:18 +0300
commit4b17214aab5d108a2b9b060e49ef6a27d43d35b4 (patch)
tree383b044d45a6146bb21fc44e9ba618ea717b0e34 /lisp/progmodes
parentc0f2c298772fbb1dcaa1da3e9c2760e09147e115 (diff)
downloademacs-4b17214aab5d108a2b9b060e49ef6a27d43d35b4.tar.gz
Fix GUD "Stop" display when running pdb
* lisp/progmodes/gud.el (gud-menu-map): Don't call gdb-show-stop-p when GUD mode is 'pdb'. (Bug#27024)
Diffstat (limited to 'lisp/progmodes')
-rw-r--r--lisp/progmodes/gud.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 8cb912706fd..e9ca7eade36 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -157,7 +157,8 @@ Used to gray out relevant toolbar icons.")
(gdb-show-run-p)))
([stop] menu-item "Stop" gud-stop-subjob
:visible (or (not (memq gud-minor-mode '(gdbmi pdb)))
- (gdb-show-stop-p)))
+ (and (eq gud-minor-mode 'gdbmi)
+ (gdb-show-stop-p))))
([until] menu-item "Continue to selection" gud-until
:enable (not gud-running)
:visible (and (memq gud-minor-mode '(gdbmi gdb perldb))