(normal-top-level): Add ~ at end of auto-save-list-file-prefix.

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)))))))