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

diff --git a/src/comp.c b/src/comp.c
index c167aaa94447d2bd2092609bbc181b325eaab933..6817fe2f92ecdbd31c127dd8dfe221b66c2ba095 100644 (file)
--- 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)),