From: João Távora Date: Thu, 17 Jan 2019 14:38:44 +0000 (+0000) Subject: Fix flymake-proc--delete-temp-directory if temp dir ends in slash X-Git-Tag: emacs-27.0.90~3804 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=80cbfb61c5a562d51197d6f3068fa5f4cda432b0;p=emacs.git Fix flymake-proc--delete-temp-directory if temp dir ends in slash Fixes: bug#34074 Reported by 林宝龙 . * lisp/progmodes/flymake-proc.el (flymake-proc--delete-temp-directory): Use directory-file-name. --- diff --git a/lisp/progmodes/flymake-proc.el b/lisp/progmodes/flymake-proc.el index 7cdbb266fe1..2d9dd047a39 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))