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

fix: profile loader file path

Browse Source 
Should load the byte-compiled version of the file (and produce one
without a redundant emacs version suffix).

Amend: 9ae7aa1122
This commit is contained in:
Henrik Lissner
2024-11-01 03:00:02 -04:00
parent 8a7b20c43d
commit bbf733c5e0
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
early-init.el
View File

@ -85,7 +85,7 @@
(expand-file-name (expand-file-name
(format (or (getenv-internal "DOOMPROFILELOADFILE") (format (or (getenv-internal "DOOMPROFILELOADFILE")
(file-name-concat (if windows? "doomemacs/data" "doom") (file-name-concat (if windows? "doomemacs/data" "doom")
"profiles.%d.el")) "profiles.%d.elc"))
emacs-major-version) emacs-major-version)
(or (if windows? (getenv-internal "LOCALAPPDATA")) (or (if windows? (getenv-internal "LOCALAPPDATA"))
(getenv-internal "XDG_DATA_HOME") (getenv-internal "XDG_DATA_HOME")

2
lisp/doom-profiles.el
View File

@ -248,7 +248,7 @@ caches them in `doom--profiles'. If RELOAD? is non-nil, refresh the cache."
(print-group! (print-group!
(or (let ((byte-compile-warnings (if init-file-debug byte-compile-warnings)) (or (let ((byte-compile-warnings (if init-file-debug byte-compile-warnings))
(byte-compile-dest-file-function (byte-compile-dest-file-function
(lambda (_) (format "%s.%d.elc" (file-name-sans-extension file) emacs-major-version)))) (lambda (_) (format "%s.elc" (file-name-sans-extension file)))))
(byte-compile-file file)) (byte-compile-file file))
;; Do it again? So the errors/warnings are visible? ;; Do it again? So the errors/warnings are visible?
;; (let ((byte-compile-warnings t)) ;; (let ((byte-compile-warnings t))