Mercurial > emacs

comparison lisp/comint.el @ 19678:aee700a39aea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(comint-file-name-chars): Use separate sets for ms-dos and windows-nt.
author Geoff Voelker <voelker@cs.washington.edu>
date Tue, 02 Sep 1997 19:37:39 +0000
parents a0ecbe13b54b
children 5797c2cbac2a
comparison
equal deleted inserted replaced
19677:b0f1b44e7a13 19678:aee700a39aea
1916 "Prefix prepended to absolute file names taken from process input. 1916 "Prefix prepended to absolute file names taken from process input.
1917 This is used by comint's and shell's completion functions, and by shell's 1917 This is used by comint's and shell's completion functions, and by shell's
1918 directory tracking functions.") 1918 directory tracking functions.")
1919 1919
1920 (defvar comint-file-name-chars 1920 (defvar comint-file-name-chars
1921 (if (memq system-type '(ms-dos windows-nt)) 1921 (cond
1922 "~/A-Za-z0-9_^$!#%&{}@`'.()-" 1922 ((eq system-type 'ms-dos)
1923 "~/A-Za-z0-9+@:_.$#%,={}-") 1923 "~/A-Za-z0-9_^$!#%&{}@`'.()-")
1924 ((eq system-type 'windows-nt)
1925 "~/A-Za-z0-9_^$!#%&{}@`'.,:()-")
1926 (t
1927 "~/A-Za-z0-9+@:_.$#%,={}-"))
1924 "String of characters valid in a file name. 1928 "String of characters valid in a file name.
1925 1929
1926 This is a good thing to set in mode hooks.") 1930 This is a good thing to set in mode hooks.")
1927 1931
1928 (defvar comint-file-name-quote-list nil 1932 (defvar comint-file-name-quote-list nil