diff options
| author | Eli Zaretskii | 2002-03-29 14:02:54 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2002-03-29 14:02:54 +0000 |
| commit | 747981b0cbc8f3b1fc7488d2817bda205a8c72a7 (patch) | |
| tree | 5d04d17f152c2fe61c1bb1affa4de708058ce346 | |
| parent | 8bff61e5c51f792de6d73c3f2e77a6b45ceae866 (diff) | |
| download | emacs-747981b0cbc8f3b1fc7488d2817bda205a8c72a7.tar.gz emacs-747981b0cbc8f3b1fc7488d2817bda205a8c72a7.zip | |
(auto-save-file-name-transforms): Don't run "\\2" via expand-file-name.
| -rw-r--r-- | lisp/files.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index c90e75f934b..c771cf01bc1 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -294,7 +294,9 @@ Normally auto-save files are written under other names." | |||
| 294 | 294 | ||
| 295 | (defcustom auto-save-file-name-transforms | 295 | (defcustom auto-save-file-name-transforms |
| 296 | `(("\\`/[^/]*:\\(.+/\\)*\\(.*\\)" | 296 | `(("\\`/[^/]*:\\(.+/\\)*\\(.*\\)" |
| 297 | ,(expand-file-name "\\2" temporary-file-directory))) | 297 | ;; Don't put "\\2" inside expand-file-name, since it will be |
| 298 | ;; transformed to "/2" on DOS/Windows. | ||
| 299 | ,(concat (expand-file-name temporary-file-directory) "\\2"))) | ||
| 298 | "*Transforms to apply to buffer file name before making auto-save file name. | 300 | "*Transforms to apply to buffer file name before making auto-save file name. |
| 299 | Each transform is a list (REGEXP REPLACEMENT): | 301 | Each transform is a list (REGEXP REPLACEMENT): |
| 300 | REGEXP is a regular expression to match against the file name. | 302 | REGEXP is a regular expression to match against the file name. |