(command-line): Add third element to auto-save-file-name-transforms.

This commit is contained in:
Glenn Morris 2002-04-20 22:25:55 +00:00
parent a0b60c3317
commit 5ecad17d8f

View file

@ -657,7 +657,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
(list (list "\\`/[^/]*:\\(.+/\\)*\\(.*\\)"
;; Don't put "\\2" inside expand-file-name, since
;; it will be transformed to "/2" on DOS/Windows.
(concat temporary-file-directory "\\2"))))
(concat temporary-file-directory "\\2") t)))
;; See if we should import version-control from the environment variable.
(let ((vc (getenv "VERSION_CONTROL")))