diff options
author | Simon Marshall <simon@gnu.org> | 1995-04-03 13:01:15 +0000 |
---|---|---|
committer | Simon Marshall <simon@gnu.org> | 1995-04-03 13:01:15 +0000 |
commit | 2c4339689160270431e75d5cf47c18bb2bf0207a (patch) | |
tree | 50f0d7a92ed9506884bb2a77d333567e70e98138 | |
parent | 5f2a2806fd3882bf0e06a22497bf78398daf2284 (diff) | |
download | emacs-2c4339689160270431e75d5cf47c18bb2bf0207a.tar.gz |
Set comint-file-name-quote-list to new shell-file-name-quote-list.
-rw-r--r-- | lisp/shell.el | 27 |
1 files changed, 19 insertions, 8 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index 68ddbed3649..e75878deb26 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -83,14 +83,15 @@ ;;; comint-mode-hook is the comint mode hook. ;;; Shell Mode Commands: -;;; shell Fires up the shell process -;;; tab comint-dynamic-complete Complete filename/command/history -;;; m-? comint-dynamic-list-filename-completions List completions in help buffer -;;; m-c-f shell-forward-command Forward a shell command -;;; m-c-b shell-backward-command Backward a shell command -;;; dirs Resync the buffer's dir stack -;;; dirtrack-toggle Turn dir tracking on/off -;;; comint-strip-ctrl-m Remove trailing ^Ms from output +;;; shell Fires up the shell process +;;; tab comint-dynamic-complete Complete filename/command/history +;;; m-? comint-dynamic-list-filename-completions +;;; List completions in help buffer +;;; m-c-f shell-forward-command Forward a shell command +;;; m-c-b shell-backward-command Backward a shell command +;;; dirs Resync the buffer's dir stack +;;; dirtrack-toggle Turn dir tracking on/off +;;; comint-strip-ctrl-m Remove trailing ^Ms from output ;;; ;;; The shell mode hook is shell-mode-hook ;;; comint-prompt-regexp is initialised to shell-prompt-pattern, for backwards @@ -134,6 +135,15 @@ shell buffer. The default is (?\\| ?& ?< ?> ?\\( ?\\) ?\\;). This is a fine thing to set in your `.emacs' file.") +(defvar shell-file-name-quote-list + (append shell-delimiter-argument-list '(?\ ?\* ?\! ?\" ?\' ?\`)) + "List of characters to quote when in a file name. +This variable is used to initialize `comint-file-name-quote-list' in the +shell buffer. The default is (?\ ?\* ?\! ?\" ?\' ?\`) plus characters +in `shell-delimiter-argument-list'. + +This is a fine thing to set in your `.emacs' file.") + (defvar shell-dynamic-complete-functions '(comint-replace-by-expanded-history shell-dynamic-complete-environment-variable @@ -307,6 +317,7 @@ buffer." (setq comint-prompt-regexp shell-prompt-pattern) (setq comint-completion-fignore shell-completion-fignore) (setq comint-delimiter-argument-list shell-delimiter-argument-list) + (setq comint-file-name-quote-list shell-file-name-quote-list) (setq comint-dynamic-complete-functions shell-dynamic-complete-functions) (make-local-variable 'paragraph-start) (setq paragraph-start comint-prompt-regexp) |