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)))