Mercurial > emacs
changeset 15818:574ec5119c7a
(shell-file-name-chars): Was shell-file-name-regexp.
(shell-mode): Set comint-file-name-chars to this variable.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 01 Aug 1996 22:35:03 +0000 |
| parents | 9e94b5fdaab1 |
| children | 4ab015189fd1 |
| files | lisp/shell.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/shell.el Thu Aug 01 22:34:09 1996 +0000 +++ b/lisp/shell.el Thu Aug 01 22:35:03 1996 +0000 @@ -134,12 +134,12 @@ This is a fine thing to set in your `.emacs' file.") -(defvar shell-file-name-regexp +(defvar shell-file-name-chars (if (memq system-type '(ms-dos windows-nt)) "~/A-Za-z0-9_^$!#%&{}@`'.()-" "~/A-Za-z0-9+@:_.$#%,={}-") - "Regexp of characters valid in a file name. -This variable is used to initialize `comint-file-name-regexp' in the + "String of characters valid in a file name. +This variable is used to initialize `comint-file-name-chars' in the shell buffer. The value may depend on the operating system or shell. This is a fine thing to set in your `.emacs' file.") @@ -332,7 +332,7 @@ (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-regexp shell-file-name-regexp) + (setq comint-file-name-chars shell-file-name-chars) (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)