aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2022-06-14 15:24:19 +0200
committerLars Ingebrigtsen2022-06-14 15:24:19 +0200
commit9225599ca73ce52f219f7e7c33676c5e740ae9a8 (patch)
treed813e8901ccf363f989967c012525ee6ff23b297
parent03124c42019401022e58ca9ebfa9b41735957ffb (diff)
downloademacs-9225599ca73ce52f219f7e7c33676c5e740ae9a8.tar.gz
emacs-9225599ca73ce52f219f7e7c33676c5e740ae9a8.zip
Make flymake-proc--delete-temp-directory slightly safer
* lisp/progmodes/flymake-proc.el (flymake-proc--delete-temp-directory): Temp dir name may be abbreviatated, so expand it first (bug#46203).
-rw-r--r--lisp/progmodes/flymake-proc.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/flymake-proc.el b/lisp/progmodes/flymake-proc.el
index eebfa70e348..4ab16831bc1 100644
--- a/lisp/progmodes/flymake-proc.el
+++ b/lisp/progmodes/flymake-proc.el
@@ -903,7 +903,7 @@ can also be executed interactively independently of
903 903
904(defun flymake-proc--delete-temp-directory (dir-name) 904(defun flymake-proc--delete-temp-directory (dir-name)
905 "Attempt to delete temp dir DIR-NAME, do not fail on error." 905 "Attempt to delete temp dir DIR-NAME, do not fail on error."
906 (let* ((temp-dir temporary-file-directory) 906 (let* ((temp-dir (file-truename temporary-file-directory))
907 (suffix (substring dir-name (1+ (length (directory-file-name temp-dir)))))) 907 (suffix (substring dir-name (1+ (length (directory-file-name temp-dir))))))
908 908
909 (while (> (length suffix) 0) 909 (while (> (length suffix) 0)