From: Andrea Corallo <akrl@sdf.org>
Date: Sun, 4 Apr 2021 20:45:36 +0000 (+0200)
Subject: * src/comp.c (fixup_eln_load_path): Fix parameter name.
X-Git-Tag: emacs-28.0.90~2727^2~39
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=39bc9bc77066c0c40d2e5fd0769ce3701055a10b;p=emacs.git

* src/comp.c (fixup_eln_load_path): Fix parameter name.
---

diff --git a/src/comp.c b/src/comp.c
index c167aaa9444..6817fe2f92e 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -4750,7 +4750,7 @@ maybe_defer_native_compilation (Lisp_Object function_name,
 /* Fixup the system eln-cache dir.  This is the last entry in
    `comp-eln-load-path'.  */
 void
-fixup_eln_load_path (Lisp_Object directory)
+fixup_eln_load_path (Lisp_Object eln_filename)
 {
   Lisp_Object last_cell = Qnil;
   Lisp_Object tmp = Vcomp_eln_load_path;
@@ -4760,7 +4760,7 @@ fixup_eln_load_path (Lisp_Object directory)
 
   Lisp_Object eln_cache_sys =
     Ffile_name_directory (concat2 (Vinvocation_directory,
-				   directory));
+				   eln_filename));
   bool preloaded =
     !NILP (Fequal (Fsubstring (eln_cache_sys, make_fixnum (-10),
 			       make_fixnum (-1)),