[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master a057771: * test/lisp/files-tests.el (files-tests--w
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master a057771: * test/lisp/files-tests.el (files-tests--with-temp-non-special): |
Date: |
Sat, 3 Feb 2018 14:08:38 -0500 (EST) |
branch: master
commit a057771a5af5c9f33ab08a1a55676f3b0ddbee74
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
* test/lisp/files-tests.el (files-tests--with-temp-non-special):
Expand `temporary-file-directory' by `file-truename', in case
it is located on a symlinked directory. (Bug#30327)
---
test/lisp/files-tests.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el
index 5f42b90..4e1d20e 100644
--- a/test/lisp/files-tests.el
+++ b/test/lisp/files-tests.el
@@ -351,7 +351,8 @@ be invoked with the right arguments."
(declare (indent 1) (debug ((symbolp symbolp &optional form) body)))
(cl-check-type name symbol)
(cl-check-type non-special-name symbol)
- `(let* ((,name (make-temp-file "files-tests" ,dir-flag))
+ `(let* ((temporary-file-directory (file-truename temporary-file-directory))
+ (,name (make-temp-file "files-tests" ,dir-flag))
(,non-special-name (file-name-quote ,name)))
(unwind-protect
(progn ,@body)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master a057771: * test/lisp/files-tests.el (files-tests--with-temp-non-special):,
Michael Albinus <=