awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

fix: empty HOME on Windows

Browse Source 
This was accidentally removed in 68d8364.

Amend: 68d8364aea
This commit is contained in:
Henrik Lissner
2022-01-28 20:57:09 +01:00
parent 6e19e75748
commit eddaae40e8
1 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
core/core.el
View File

@ -53,6 +53,13 @@ envvar will enable this at startup.")
(defconst IS-WINDOWS (memq system-type '(cygwin windows-nt ms-dos))) (defconst IS-WINDOWS (memq system-type '(cygwin windows-nt ms-dos)))
(defconst IS-BSD (or IS-MAC (eq system-type 'berkeley-unix))) (defconst IS-BSD (or IS-MAC (eq system-type 'berkeley-unix)))
(when-let (realhome
(and IS-WINDOWS
(null (getenv-internal "HOME"))
(getenv "USERPROFILE")))
(setenv "HOME" realhome)
(setq abbreviated-home-dir nil))
;; ;;
;;; Directory variables ;;; Directory variables