# HG changeset patch
# User Eric S. Raymond <esr@snark.thyrsus.com>
# Date 734452085 0
# Node ID d567a93d940810cfb10476defd971f43a4fd4fba
# Parent  10509afe258862297df62e6525f035480d2b222f
(gdb, sdb, dbx): Improved prompting a la grep.

diff -r 10509afe2588 -r d567a93d9408 lisp/gud.el
--- a/lisp/gud.el	Sat Apr 10 14:27:54 1993 +0000
+++ b/lisp/gud.el	Sat Apr 10 14:28:05 1993 +0000
@@ -213,7 +213,7 @@
   "Run gdb on program FILE in buffer *gud-FILE*.
 The directory containing FILE becomes the initial working directory
 and source-file directory for your debugger."
-  (interactive "sgdb ")
+  (interactive "sRun gdb (like this): gdb ")
   (gud-overload-functions '((gud-debugger-startup . gud-gdb-debugger-startup)
 			    (gud-marker-filter    . gud-gdb-marker-filter)
 			    (gud-find-file        . gud-gdb-find-file)
@@ -284,7 +284,9 @@
   "Run sdb on program FILE in buffer *gud-FILE*.
 The directory containing FILE becomes the initial working directory
 and source-file directory for your debugger."
-  (interactive "ssdb ")
+
+  (interactive "sRun sdb (like this): sdb ")
+
   (if (and gud-sdb-needs-tags
 	   (not (and (boundp 'tags-file-name) (file-exists-p tags-file-name))))
       (error "The sdb support requires a valid tags table to work."))
@@ -332,7 +334,7 @@
   "Run dbx on program FILE in buffer *gud-FILE*.
 The directory containing FILE becomes the initial working directory
 and source-file directory for your debugger."
-  (interactive "sdbx")
+  (interactive "sRun dbx (like this): dbx")
   (gud-overload-functions '((gud-debugger-startup . gud-dbx-debugger-startup)
 			    (gud-marker-filter    . gud-dbx-marker-filter)
 			    (gud-find-file        . gud-dbx-find-file)