diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-08-01 22:37:47 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-08-01 22:37:47 +0000 |
| commit | 1a3d0f63e1fb259e0baaa96e775939ebe1453419 (patch) | |
| tree | 465299d6be2413941359fba7f899914a5e11f0f9 /lisp/gud.el | |
| parent | 40ad0558761927ec781577f0d3bdae6414948853 (diff) | |
| download | emacs-1a3d0f63e1fb259e0baaa96e775939ebe1453419.tar.gz | |
(gdb): Undo previous change.
Diffstat (limited to 'lisp/gud.el')
| -rw-r--r-- | lisp/gud.el | 13 |
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) |