From d8b6847aa98e5f642533178bc63df8c7619692c7 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Tue, 22 Oct 2024 16:40:12 +0200 Subject: [PATCH] * Rework 'comp-lookup-eln' * 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 | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index f72d23fee1a..fc87014202c 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -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))) -- 2.39.2