diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2023-10-15 12:26:43 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2023-10-15 12:26:43 +0200 |
| commit | 07c45f20fd3828548d5f0c110034e9857a94ccaf (patch) | |
| tree | 21c4362106615337f3967d4fd8df4f5e1448f615 | |
| parent | 5d3f3288d221c2e1bbe7c7d1464171ac0a4cfb05 (diff) | |
| download | emacs-07c45f20fd3828548d5f0c110034e9857a94ccaf.tar.gz emacs-07c45f20fd3828548d5f0c110034e9857a94ccaf.tar.bz2 emacs-07c45f20fd3828548d5f0c110034e9857a94ccaf.zip | |
Fix test in files-tests
* test/lisp/files-tests.el
(files-tests-file-name-non-special-expand-file-name-tilde): Fix test.
| -rw-r--r-- | test/lisp/files-tests.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el index 8f6495a293c..78d469580ba 100644 --- a/test/lisp/files-tests.el +++ b/test/lisp/files-tests.el @@ -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) |