summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNick Roberts <nickrob@snap.net.nz>2006-06-05 10:10:51 +0000
committerNick Roberts <nickrob@snap.net.nz>2006-06-05 10:10:51 +0000
commit121586b1f77c36990e97265e7edbd936b14a3239 (patch)
tree108b6ec8d9486d44a365428964a2a3e8e5d15ece
parentdac5ab0a1b7251c153c1b1cb3425a4dd8ce8c041 (diff)
downloademacs-121586b1f77c36990e97265e7edbd936b14a3239.tar.gz
(gud-menu-map): Use a conditional help echo for gud-go.
(gud-common-init): Other debuggers may trigger error.
-rw-r--r--lisp/progmodes/gud.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 292ebdff107..4e3acf80b58 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -147,7 +147,7 @@ Used to grey out relevant togolbar icons.")
: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 @@ comint mode, which see."
(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.