feature/native-comp ee53560 2/2: * Don't require trailing backslashes in `comp-eln-load-path' (bug#45462)

[Andrea Corallo]

branch: feature/native-comp
commit ee53560c8cb1236bb60304157882abe8e7cddaff
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * Don't require trailing backslashes in `comp-eln-load-path' (bug#45462)
    
        * src/comp.c (Fcomp_el_to_eln_filename): Don't require
        trailing backslashes in comp-eln-load-path.
---
 src/comp.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/comp.c b/src/comp.c
index ee3c15a..52ebf92 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -4085,7 +4085,8 @@ If BASE-DIR is nil use the first entry in 
`comp-eln-load-path'.  */)
     base_dir = Fexpand_file_name (base_dir, Vinvocation_directory);
 
   return Fexpand_file_name (filename,
-                           concat2 (base_dir, Vcomp_native_version_dir));
+                           concat2 (Ffile_name_as_directory (base_dir),
+                                    Vcomp_native_version_dir));
 }
 
 DEFUN ("comp--install-trampoline", Fcomp__install_trampoline,