branch: externals/async
commit 59f6ee68eb9bed8de12d71ca78a11dd8effbc2aa
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Ensure the trailing slash in dir name is removed
---
 async-bytecomp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/async-bytecomp.el b/async-bytecomp.el
index 1797c5cb74..a5d637090a 100644
--- a/async-bytecomp.el
+++ b/async-bytecomp.el
@@ -82,7 +82,7 @@ of variable `temporary-file-directory' in async processes.")
       (and postproc (funcall postproc)))))
 
 (defun async-bytecomp--file-to-comp-buffer (file-or-dir &optional quiet type 
log-file)
-  (let ((bn (file-name-nondirectory file-or-dir))
+  (let ((bn (file-name-nondirectory (directory-file-name file-or-dir)))
         (action-name (pcase type
                        ('file "File")
                        ('directory "Directory"))))

Reply via email to