1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-22 18:35:09 +00:00

Make sure *scratch* etc. use forward slashes in its default-directory

* lisp/startup.el (normal-top-level): On MS-Windows, convert
backslashes to forward slashes while decoding default-directory
of the initially-created buffers.
This commit is contained in:
Eli Zaretskii 2015-12-25 18:37:31 +02:00
parent e59b2ee8cd
commit b6ad4608be

View File

@ -544,7 +544,11 @@ It is the default value of the variable `top-level'."
(set-buffer elt)
(if default-directory
(setq default-directory
(decode-coding-string default-directory coding t)))))
(if (eq system-type 'windows-nt)
;; Convert backslashes to forward slashes.
(expand-file-name
(decode-coding-string default-directory coding t))
(decode-coding-string default-directory coding t))))))
;; Decode all the important variables and directory lists, now
;; that we know the locale's encoding. This is because the