diff options
author | Richard M. Stallman <rms@gnu.org> | 1996-01-02 01:16:39 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1996-01-02 01:16:39 +0000 |
commit | 909084a1abfd54b40903224b659e3159a72fa3a5 (patch) | |
tree | b9e7de9299e258aa33f9f7059820249d4cf0fa39 | |
parent | 89b808f61eee840c483057650a809aea56ad2a91 (diff) | |
download | emacs-909084a1abfd54b40903224b659e3159a72fa3a5.tar.gz |
(normal-top-level): Add ~ at end of auto-save-list-file-prefix.
-rw-r--r-- | lisp/startup.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index d8d432c279c..8610f56a2b6 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -353,9 +353,12 @@ from being initialized.") ;; Under MS-DOS our PID is almost always reused between ;; Emacs invocations. We need something more unique. (if (eq system-type 'ms-dos) - (make-temp-name - (expand-file-name auto-save-list-file-prefix)) - (expand-file-name (format "%s%d-%s" + (concat + (make-temp-name + (expand-file-name auto-save-list-file-prefix)) + "~") + + (expand-file-name (format "%s%d-%s~" auto-save-list-file-prefix (emacs-pid) (system-name))))))) |