# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1223659858 0
# Node ID ca935ec2396942b9c4143d2e85e2b72a329834c3
# Parent  5a0b7bb9621e4c099a0aa15045ecbacdd1ea685b
(minibuffer-complete-shell-command): Bind
comint-delimiter-argument-list, comint-file-name-chars and
comint-file-name-quote-list like shell-mode.

diff -r 5a0b7bb9621e -r ca935ec23969 lisp/ChangeLog
--- 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
diff -r 5a0b7bb9621e -r ca935ec23969 lisp/simple.el
--- 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)))