diff options
| author | Stefan Monnier | 2004-05-19 00:30:43 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2004-05-19 00:30:43 +0000 |
| commit | b1e5937ca1bb2202e372e2d35122ad10077e5a61 (patch) | |
| tree | 527c79ba7d02aa94867ec0e9353eb7093982aa2d | |
| parent | cc9f53769f6fc1610e748350550d667f8aca9f80 (diff) | |
| download | emacs-b1e5937ca1bb2202e372e2d35122ad10077e5a61.tar.gz emacs-b1e5937ca1bb2202e372e2d35122ad10077e5a61.zip | |
(auto-save-file-name-transforms): Make sure ange-ftp temp
files files don't contain an accidental additional /.
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 91da8a4c2c7..99cad16cf5b 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -293,7 +293,7 @@ Normally auto-save files are written under other names." | |||
| 293 | :group 'auto-save) | 293 | :group 'auto-save) |
| 294 | 294 | ||
| 295 | (defcustom auto-save-file-name-transforms | 295 | (defcustom auto-save-file-name-transforms |
| 296 | `(("\\`/[^/]*:\\(.+/\\)*\\(.*\\)" | 296 | `(("\\`/[^/]*:\\([^/]*/\\)*\\([^/]*\\)\\'" |
| 297 | ;; Don't put "\\2" inside expand-file-name, since it will be | 297 | ;; Don't put "\\2" inside expand-file-name, since it will be |
| 298 | ;; transformed to "/2" on DOS/Windows. | 298 | ;; transformed to "/2" on DOS/Windows. |
| 299 | ,(concat temporary-file-directory "\\2") t)) | 299 | ,(concat temporary-file-directory "\\2") t)) |