(gud-minor-mode-map): Make "stop" button visible in

text mode when program is running.
(gud-tooltip-mode): Autoload so that it can be set by customize.

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 3e2556791a7c12c92a5f1f31ef9518d4a71d65ef..58f6c2671ecf0cd7ca06f2e7646562c3d22dd1c1 100644 (file)
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -251,8 +251,8 @@ Used to grey out relevant toolbar icons.")
                      (eq gud-minor-mode 'gdba)))
        ([menu-bar stop] menu-item
        ,(propertize "stop" 'face 'font-lock-doc-face) gud-stop-subjob
-       :visible (or gud-running
-                    (not (eq gud-minor-mode 'gdba))))
+       :visible (and gud-running
+                    (eq gud-minor-mode 'gdba)))
        ([menu-bar print]
        . (,(propertize "print" 'face 'font-lock-doc-face) . gud-print))
        ([menu-bar tools] . undefined)
@@ -3239,6 +3239,7 @@ Treats actions as defuns."
 
 ;;; Customizable settings
 
+;;;###autoload
 (define-minor-mode gud-tooltip-mode
   "Toggle the display of GUD tooltips."
   :global t