Mercurial > emacs
changeset 98609:ca935ec23969
(minibuffer-complete-shell-command): Bind
comint-delimiter-argument-list, comint-file-name-chars and
comint-file-name-quote-list like shell-mode.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Fri, 10 Oct 2008 17:30:58 +0000 |
parents | 5a0b7bb9621e |
children | 2f7ac1ab3e9e |
files | lisp/ChangeLog lisp/simple.el |
diffstat | 2 files changed, 10 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Oct 10 15:07:28 2008 +0000 +++ b/lisp/ChangeLog Fri Oct 10 17:30:58 2008 +0000 @@ -1,3 +1,9 @@ +2008-10-10 Andreas Schwab <schwab@suse.de> + + * simple.el (minibuffer-complete-shell-command): Bind + comint-delimiter-argument-list, comint-file-name-chars and + comint-file-name-quote-list like shell-mode. + 2008-10-10 Martin Rudalics <rudalics@gmx.at> * window.el (pop-to-buffer): Fix misplacement of arg norecord in
--- a/lisp/simple.el Fri Oct 10 15:07:28 2008 +0000 +++ b/lisp/simple.el Fri Oct 10 17:30:58 2008 +0000 @@ -1998,7 +1998,10 @@ "Dynamically complete shell command at point." (interactive) (require 'shell) - (run-hook-with-args-until-success 'shell-dynamic-complete-functions)) + (let ((comint-delimiter-argument-list shell-delimiter-argument-list) + (comint-file-name-chars shell-file-name-chars) + (comint-file-name-quote-list shell-file-name-quote-list)) + (run-hook-with-args-until-success 'shell-dynamic-complete-functions))) (defvar minibuffer-local-shell-command-map (let ((map (make-sparse-keymap)))