summaryrefslogtreecommitdiff
path: root/test/lisp/progmodes
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2017-05-31 21:11:47 -0400
committerGlenn Morris <rgm@gnu.org>2017-05-31 21:11:47 -0400
commitc4ecc01a45c6dd183f0ecf65e4c4c2c39beea278 (patch)
tree866c0c680042613276c85951171ff2f6290a1393 /test/lisp/progmodes
parent32fd8768093e21f1e812548d27c0bfd70cd82f78 (diff)
downloademacs-c4ecc01a45c6dd183f0ecf65e4c4c2c39beea278.tar.gz
Avoid elisp-mode test failures when source dir has multiple names
* test/lisp/progmodes/elisp-mode-tests.el (emacs-test-dir): Use the true name of the directory.
Diffstat (limited to 'test/lisp/progmodes')
-rw-r--r--test/lisp/progmodes/elisp-mode-tests.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/test/lisp/progmodes/elisp-mode-tests.el b/test/lisp/progmodes/elisp-mode-tests.el
index 03ae8481ee5..ee0837f2c4c 100644
--- a/test/lisp/progmodes/elisp-mode-tests.el
+++ b/test/lisp/progmodes/elisp-mode-tests.el
@@ -290,7 +290,10 @@ to (xref-elisp-test-descr-to-target xref)."
;; `load-path' has the correct case, so this causes the expected test
;; values to have the wrong case). This is handled in
;; `xref-elisp-test-run'.
-(defconst emacs-test-dir (downcase (file-name-directory (or load-file-name (buffer-file-name)))))
+(defconst emacs-test-dir
+ (downcase
+ (file-truename (file-name-directory
+ (or load-file-name (buffer-file-name))))))
;; alphabetical by test name