]> git.eshelyaron.com Git - emacs.git/commitdiff
* Rework 'comp-lookup-eln'
authorAndrea Corallo <acorallo@gnu.org>
Tue, 22 Oct 2024 14:40:12 +0000 (16:40 +0200)
committerEshel Yaron <me@eshelyaron.com>
Tue, 22 Oct 2024 19:03:24 +0000 (21:03 +0200)
* lisp/emacs-lisp/comp.el (comp-lookup-eln): Rework to use
'comp-eln-load-path-eff'.

(cherry picked from commit 202adfcfcc2ed20fa91d8377107618c8113f7106)

lisp/emacs-lisp/comp.el

index f72d23fee1a3fe45cf1819ba05fcf85f776612dd..fc87014202c27ca70ea3efc232af4513b12853ee 100644 (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)))