[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 80cbfb6: Fix flymake-proc--delete-temp-directory if
From: |
João Távora |
Subject: |
[Emacs-diffs] master 80cbfb6: Fix flymake-proc--delete-temp-directory if temp dir ends in slash |
Date: |
Thu, 17 Jan 2019 09:39:04 -0500 (EST) |
branch: master
commit 80cbfb61c5a562d51197d6f3068fa5f4cda432b0
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>
Fix flymake-proc--delete-temp-directory if temp dir ends in slash
Fixes: bug#34074
Reported by æž—å®é¾™ <address@hidden>.
* lisp/progmodes/flymake-proc.el
(flymake-proc--delete-temp-directory): Use directory-file-name.
---
lisp/progmodes/flymake-proc.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/progmodes/flymake-proc.el b/lisp/progmodes/flymake-proc.el
index 7cdbb26..2d9dd04 100644
--- a/lisp/progmodes/flymake-proc.el
+++ b/lisp/progmodes/flymake-proc.el
@@ -887,7 +887,7 @@ can also be executed interactively independently of
(defun flymake-proc--delete-temp-directory (dir-name)
"Attempt to delete temp dir created by
`flymake-proc-create-temp-with-folder-structure', do not fail on error."
(let* ((temp-dir temporary-file-directory)
- (suffix (substring dir-name (1+ (length temp-dir)))))
+ (suffix (substring dir-name (1+ (length (directory-file-name
temp-dir))))))
(while (> (length suffix) 0)
(setq suffix (directory-file-name suffix))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 80cbfb6: Fix flymake-proc--delete-temp-directory if temp dir ends in slash,
João Távora <=