Fix test in files-tests

* test/lisp/files-tests.el
(files-tests-file-name-non-special-expand-file-name-tilde): Fix test.
This commit is contained in:
Michael Albinus 2023-10-15 12:26:43 +02:00
parent 5d3f3288d2
commit 07c45f20fd

View file

@ -664,7 +664,8 @@ unquoted file names."
(ert-deftest files-tests-file-name-non-special-expand-file-name-tilde ()
(let ((process-environment
(cons (format "HOME=%s" temporary-file-directory) process-environment))
(cons (format "HOME=%s" (file-truename temporary-file-directory))
process-environment))
abbreviated-home-dir)
(files-tests--with-temp-non-special (tmpfile nospecial)
(let (file-name-handler-alist)