Commit e886137a authored by Karl Heuer's avatar Karl Heuer
Browse files

(gdb): Use a minibuffer map with TAB to complete a filename.

parent b492f73b
......@@ -213,6 +213,14 @@ we're in the GUD buffer)."
(defun gud-gdb-find-file (f)
(find-file-noselect f))
(defvar gdb-minibuffer-local-map nil
"Keymap for minibuffer prompting of gdb startup command.")
(if gdb-minibuffer-local-map
()
(setq gdb-minibuffer-local-map (copy-keymap minibuffer-local-map))
(define-key
gdb-minibuffer-local-map "\C-i" 'comint-dynamic-complete-filename))
;;;###autoload
(defun gdb (command-line)
"Run gdb on program FILE in buffer *gud-FILE*.
......@@ -223,7 +231,7 @@ and source-file directory for your debugger."
(if (consp gud-gdb-history)
(car gud-gdb-history)
"gdb ")
nil nil
gdb-minibuffer-local-map nil
'(gud-gdb-history . 1))))
(gud-overload-functions '((gud-massage-args . gud-gdb-massage-args)
(gud-marker-filter . gud-gdb-marker-filter)
......
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