summaryrefslogtreecommitdiff
path: root/lisp/w32-fns.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-06-05 18:25:05 +0000
committerRichard M. Stallman <rms@gnu.org>1996-06-05 18:25:05 +0000
commit2c64f523bc2f97ba9819d0291995a5ff9b74bdec (patch)
treef3ead07648488a3678ad1a6386e8d7fce1141043 /lisp/w32-fns.el
parentccb8e94ed8abbed567b3dec6448fdc7aeb791664 (diff)
downloademacs-2c64f523bc2f97ba9819d0291995a5ff9b74bdec.tar.gz
(shell-mode-hook): Set comint-completion-addsuffix
so that the directory suffix is backslash and the file suffix is space.
Diffstat (limited to 'lisp/w32-fns.el')
-rw-r--r--lisp/w32-fns.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el
index 9b6046b4f13..e649101c5a9 100644
--- a/lisp/w32-fns.el
+++ b/lisp/w32-fns.el
@@ -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 ";")