1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00

* Rework 'comp-lookup-eln'

* lisp/emacs-lisp/comp.el (comp-lookup-eln): Rework to use
'comp-eln-load-path-eff'.
This commit is contained in:
Andrea Corallo 2024-10-22 16:40:12 +02:00
parent f58652a419
commit 202adfcfcc

View file

@ -3643,12 +3643,8 @@ the deferred compilation mechanism."
Search happens in `native-comp-eln-load-path'."
(cl-loop
with eln-filename = (comp-el-to-eln-rel-filename filename)
for dir in native-comp-eln-load-path
for f = (expand-file-name eln-filename
(expand-file-name comp-native-version-dir
(expand-file-name
dir
invocation-directory)))
for dir in (comp-eln-load-path-eff)
for f = (expand-file-name eln-filename dir)
when (file-exists-p f)
do (cl-return f)))