# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1222370763 0
# Node ID 26e60becb11f58fe4cb89db9b0674245d39fc79e
# Parent  260673b5a172960e134a0e1431a71b81c28f7f55
(comint-dynamic-complete-as-filename): Quote directory name when
reinserting it.

diff -r 260673b5a172 -r 26e60becb11f lisp/comint.el
--- a/lisp/comint.el	Thu Sep 25 19:25:44 2008 +0000
+++ b/lisp/comint.el	Thu Sep 25 19:26:03 2008 +0000
@@ -2848,7 +2848,7 @@
 	     ;; may have a different case than what's in the prompt,
 	     ;; if read-file-name-completion-ignore-case is non-nil,
 	     (delete-region filename-beg filename-end)
-	     (if filedir (insert filedir))
+	     (if filedir (insert (comint-quote-filename filedir)))
 	     (insert (comint-quote-filename (directory-file-name completion)))
 	     (cond ((symbolp (file-name-completion completion directory))
 		    ;; We inserted a unique completion.