Commit 80e2afdd authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(gdb): Bind comint-file-name-regexp.

parent 43d3039d
......@@ -268,12 +268,13 @@ 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 (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 (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)))))
(gud-common-init command-line 'gud-gdb-massage-args
'gud-gdb-marker-filter 'gud-gdb-find-file)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment