Mercurial > emacs
changeset 66897:b9eae5edf0dc
(gud-menu-map): Make visibility of stop and
go buttons complementary.
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Tue, 15 Nov 2005 22:37:49 +0000 |
| parents | 8b7b188574d7 |
| children | 93ed49d5686d |
| files | lisp/progmodes/gud.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/gud.el Tue Nov 15 22:36:55 2005 +0000 +++ b/lisp/progmodes/gud.el Tue Nov 15 22:37:49 2005 +0000 @@ -140,10 +140,12 @@ (memq gud-minor-mode '(gdbmi gdb dbx jdb))) :visible (not (eq gud-minor-mode 'gdba))) ([go] menu-item "Run/Continue" gud-go - :enable (not gud-running) - :visible (eq gud-minor-mode 'gdba)) + :visible (and (not gud-running) + (eq gud-minor-mode 'gdba))) ([stop] menu-item "Stop" comint-interrupt-subjob - :enable gud-running) + :visible (or (not (eq gud-minor-mode 'gdba)) + (and gud-running + (eq gud-minor-mode 'gdba)))) ([until] menu-item "Continue to selection" gud-until :enable (and (not gud-running) (memq gud-minor-mode '(gdbmi gdba gdb perldb)))