diff options
| author | Richard M. Stallman | 1996-06-05 18:25:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-06-05 18:25:05 +0000 |
| commit | 3eab6a03af19a5070f1499e9dde38dde88c4322e (patch) | |
| tree | dfd3a5fd69aa0715cf2812b0107e1df4567a6b53 | |
| parent | dbdfff7f1d1f15af351dee8671e94331411b6cb9 (diff) | |
| download | emacs-3eab6a03af19a5070f1499e9dde38dde88c4322e.tar.gz emacs-3eab6a03af19a5070f1499e9dde38dde88c4322e.zip | |
(shell-mode-hook): Set comint-completion-addsuffix
so that the directory suffix is backslash and the file suffix is space.
| -rw-r--r-- | lisp/w32-fns.el | 4 |
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 @@ | |||
| 63 | ;; for executing its command line argument (from simple.el). | 63 | ;; for executing its command line argument (from simple.el). |
| 64 | (setq shell-command-switch "/c") | 64 | (setq shell-command-switch "/c") |
| 65 | 65 | ||
| 66 | ;; For appending suffixes to directories and files in shell completions. | ||
| 67 | (add-hook 'shell-mode-hook | ||
| 68 | '(lambda () (setq comint-completion-addsuffix '("\\" . " ")))) | ||
| 69 | |||
| 66 | ;; Use ";" instead of ":" as a path separator (from files.el). | 70 | ;; Use ";" instead of ":" as a path separator (from files.el). |
| 67 | (setq path-separator ";") | 71 | (setq path-separator ";") |
| 68 | 72 | ||