emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix references to comp-eln-load-path

Browse source
This commit is contained in:
Henrik Lissner 2021-05-08 18:56:25 -04:00
parent 27e9c756ea
commit 62d2f27510
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
core/cli/packages.el
View file

@ -144,7 +144,7 @@ list remains lean."
(defvar doom--eln-output-expected nil) (defvar doom--eln-output-expected nil)
(defvar doom--eln-output-path (car (bound-and-true-p comp-eln-load-path))) (defvar doom--eln-output-path (car (bound-and-true-p native-comp-eln-load-path)))
(defun doom--eln-file-name (file) (defun doom--eln-file-name (file)
"Return the short .eln file name corresponding to `file'." "Return the short .eln file name corresponding to `file'."
@ -161,12 +161,12 @@ list remains lean."
(concat doom--eln-output-path eln-name ".error")) (concat doom--eln-output-path eln-name ".error"))
(defun doom--find-eln-file (eln-name) (defun doom--find-eln-file (eln-name)
"Find `eln-name' on the `comp-eln-load-path'." "Find `eln-name' on the `native-comp-eln-load-path'."
(cl-some (lambda (eln-path) (cl-some (lambda (eln-path)
(let ((file (concat eln-path eln-name))) (let ((file (concat eln-path eln-name)))
(when (file-exists-p file) (when (file-exists-p file)
file))) file)))
comp-eln-load-path)) native-comp-eln-load-path))
(defun doom--elc-file-outdated-p (file) (defun doom--elc-file-outdated-p (file)
"Check whether the corresponding .elc for `file' is outdated." "Check whether the corresponding .elc for `file' is outdated."