# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1149502251 0
# Node ID 07cd76eb8e03b4cc318d443fa1737ef6bd366b9d
# Parent  4331609429da30d2e4e7748152caea258b0845b8
(gud-menu-map): Use a conditional help echo for gud-go.
(gud-common-init): Other debuggers may trigger error.

diff -r 4331609429da -r 07cd76eb8e03 lisp/progmodes/gud.el
--- a/lisp/progmodes/gud.el	Mon Jun 05 07:11:33 2006 +0000
+++ b/lisp/progmodes/gud.el	Mon Jun 05 10:10:51 2006 +0000
@@ -147,7 +147,7 @@
                   :enable (and (not gud-running)
 			       (memq gud-minor-mode '(gdbmi gdb dbx jdb)))
 		  :visible (not (eq gud-minor-mode 'gdba)))
-    ([go]	menu-item "Run/Continue" gud-go
+    ([go]	menu-item (if gdb-active-process "Continue" "Run") gud-go
 		  :visible (and (not gud-running)
 				(eq gud-minor-mode 'gdba)))
     ([stop]	menu-item "Stop" gud-stop-subjob
@@ -2565,7 +2565,7 @@
 	 (existing-buffer (get-buffer (concat "*gud" filepart "*"))))
     (pop-to-buffer (concat "*gud" filepart "*"))
     (when (and existing-buffer (get-buffer-process existing-buffer))
-      (error "This program is already running under gdb"))
+      (error "This program is already being debugged"))
     ;; Set the dir, in case the buffer already existed with a different dir.
     (setq default-directory dir)
     ;; Set default-directory to the file's directory.