# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 833999105 0
# Node ID b0d95c32f0264add6ec58338a4663400a9c147d6
# Parent  cf1e6f4dd2b0b3e4414ef1fc45bbe276e0d970df
(shell-mode-hook): Set comint-completion-addsuffix
so that the directory suffix is backslash and the file suffix is space.

diff -r cf1e6f4dd2b0 -r b0d95c32f026 lisp/w32-fns.el
--- a/lisp/w32-fns.el	Wed Jun 05 18:24:14 1996 +0000
+++ b/lisp/w32-fns.el	Wed Jun 05 18:25:05 1996 +0000
@@ -63,6 +63,10 @@
 ;; for executing its command line argument (from simple.el).
 (setq shell-command-switch "/c")
 
+;; For appending suffixes to directories and files in shell completions.
+(add-hook 'shell-mode-hook 
+	  '(lambda () (setq comint-completion-addsuffix '("\\" . " "))))
+
 ;; Use ";" instead of ":" as a path separator (from files.el).
 (setq path-separator ";")