summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-08-01 22:37:47 +0000
committerRichard M. Stallman <rms@gnu.org>1996-08-01 22:37:47 +0000
commit1a3d0f63e1fb259e0baaa96e775939ebe1453419 (patch)
tree465299d6be2413941359fba7f899914a5e11f0f9
parent40ad0558761927ec781577f0d3bdae6414948853 (diff)
downloademacs-1a3d0f63e1fb259e0baaa96e775939ebe1453419.tar.gz
(gdb): Undo previous change.
-rw-r--r--lisp/gud.el13
1 files changed, 6 insertions, 7 deletions
diff --git a/lisp/gud.el b/lisp/gud.el
index 48664a05608..281ceb50573 100644
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -268,13 +268,12 @@ and create such a submap in that new map."
The directory containing FILE becomes the initial working directory
and source-file directory for your debugger."
(interactive
- (list (let ((comint-file-name-regexp "~/A-Za-z0-9+@:_.$#%,={}-"))
- (read-from-minibuffer "Run gdb (like this): "
- (if (consp gud-gdb-history)
- (car gud-gdb-history)
- "gdb ")
- gdb-minibuffer-local-map nil
- '(gud-gdb-history . 1)))))
+ (list (read-from-minibuffer "Run gdb (like this): "
+ (if (consp gud-gdb-history)
+ (car gud-gdb-history)
+ "gdb ")
+ gdb-minibuffer-local-map nil
+ '(gud-gdb-history . 1))))
(gud-common-init command-line 'gud-gdb-massage-args
'gud-gdb-marker-filter 'gud-gdb-find-file)