# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1175635649 0
# Node ID 8199e670326839c2e6c507390d912dcf05920442
# Parent  d13721cc3255d978635982feed1720ef978e6fda
(gud-minor-mode-map): Simplify.

diff -r d13721cc3255 -r 8199e6703268 lisp/progmodes/gud.el
--- a/lisp/progmodes/gud.el	Tue Apr 03 21:26:46 2007 +0000
+++ b/lisp/progmodes/gud.el	Tue Apr 03 21:27:29 2007 +0000
@@ -231,7 +231,7 @@
        ([menu-bar until] menu-item
 	,(propertize "until" 'face 'font-lock-doc-face) gud-until
 		  :visible (memq gud-minor-mode '(gdbmi gdba gdb perldb)))
-       ([menu-bar cont]	menu-item
+       ([menu-bar cont] menu-item
 	,(propertize "cont" 'face 'font-lock-doc-face) gud-cont
 	:visible (not (eq gud-minor-mode 'gdba)))
        ([menu-bar run] menu-item
@@ -243,9 +243,8 @@
 		      (eq gud-minor-mode 'gdba)))
        ([menu-bar stop] menu-item
 	,(propertize "stop" 'face 'font-lock-doc-face) gud-stop-subjob
-	:visible (or (not (eq gud-minor-mode 'gdba))
-		     (and gud-running
-			  (eq gud-minor-mode 'gdba))))
+	:visible (or gud-running
+		     (not (eq gud-minor-mode 'gdba))))
        ([menu-bar print]
 	. (,(propertize "print" 'face 'font-lock-doc-face) . gud-print))
        ([menu-bar tools] . undefined)