diff options
| author | Glenn Morris <rgm@gnu.org> | 2017-03-03 19:46:57 -0500 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2017-03-03 19:46:57 -0500 |
| commit | 69dde0c54ce8d4ae9600bd10fa15b2b1e227c1f3 (patch) | |
| tree | 97ebdd0e9b0794083484e5dc108410f6163d272c /lisp/progmodes/gud.el | |
| parent | 87849fe31f6950e1e073f293d6a1a2e1795e426a (diff) | |
| download | emacs-69dde0c54ce8d4ae9600bd10fa15b2b1e227c1f3.tar.gz emacs-69dde0c54ce8d4ae9600bd10fa15b2b1e227c1f3.tar.bz2 emacs-69dde0c54ce8d4ae9600bd10fa15b2b1e227c1f3.zip | |
Avoid duplicate gud menu items with gdb-mi
* lisp/progmodes/gud.el (gud-menu-map): Avoid duplicate "Run"
entries in gdbmi mode. (Bug#23923)
Diffstat (limited to 'lisp/progmodes/gud.el')
| -rw-r--r-- | lisp/progmodes/gud.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 1301758ea12..7ab1442c648 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el @@ -146,7 +146,11 @@ Used to gray out relevant toolbar icons.") ([refresh] "Refresh" . gud-refresh) ([run] menu-item "Run" gud-run :enable (not gud-running) - :visible (memq gud-minor-mode '(gdbmi gdb dbx jdb))) + :visible (or (memq gud-minor-mode '(gdb dbx jdb)) + (and (eq gud-minor-mode 'gdbmi) + (or (not (gdb-show-run-p)) + (bound-and-true-p + gdb-active-process))))) ([go] menu-item (if (bound-and-true-p gdb-active-process) "Continue" "Run") gud-go :visible (and (eq gud-minor-mode 'gdbmi) |