diff options
| author | Glenn Morris | 2017-05-31 21:11:47 -0400 |
|---|---|---|
| committer | Glenn Morris | 2017-05-31 21:11:47 -0400 |
| commit | c4ecc01a45c6dd183f0ecf65e4c4c2c39beea278 (patch) | |
| tree | 866c0c680042613276c85951171ff2f6290a1393 | |
| parent | 32fd8768093e21f1e812548d27c0bfd70cd82f78 (diff) | |
| download | emacs-c4ecc01a45c6dd183f0ecf65e4c4c2c39beea278.tar.gz emacs-c4ecc01a45c6dd183f0ecf65e4c4c2c39beea278.zip | |
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.
| -rw-r--r-- | test/lisp/progmodes/elisp-mode-tests.el | 5 |
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)." | |||
| 290 | ;; `load-path' has the correct case, so this causes the expected test | 290 | ;; `load-path' has the correct case, so this causes the expected test |
| 291 | ;; values to have the wrong case). This is handled in | 291 | ;; values to have the wrong case). This is handled in |
| 292 | ;; `xref-elisp-test-run'. | 292 | ;; `xref-elisp-test-run'. |
| 293 | (defconst emacs-test-dir (downcase (file-name-directory (or load-file-name (buffer-file-name))))) | 293 | (defconst emacs-test-dir |
| 294 | (downcase | ||
| 295 | (file-truename (file-name-directory | ||
| 296 | (or load-file-name (buffer-file-name)))))) | ||
| 294 | 297 | ||
| 295 | 298 | ||
| 296 | ;; alphabetical by test name | 299 | ;; alphabetical by test name |