Fix reftex-tests on MS-Windows.

test/automated/reftex-tests.el (reftex-parse-from-file-test): Run
 temp-dir through file-truename, to make sure the temporary file
 names are comparable as strings.
This commit is contained in:
Eli Zaretskii 2013-11-29 12:33:31 +02:00
parent a48eb50b56
commit de20f087b8
2 changed files with 12 additions and 1 deletions

View file

@ -1,5 +1,9 @@
2013-11-29 Eli Zaretskii <eliz@gnu.org>
* automated/reftex-tests.el (reftex-parse-from-file-test): Run
temp-dir through file-truename, to make sure the temporary file
names are comparable as strings.
* automated/decoder-tests.el (ert-test-decoder-prefer-utf-8):
Force Unix EOLs by using 'utf-8-unix', since the default of
'utf-8' is system-dependent, while the test expects to see Unix

View file

@ -95,7 +95,14 @@
(ert-deftest reftex-parse-from-file-test ()
"Test `reftex-parse-from-file'."
(let* ((temp-dir (make-temp-file "reftex-parse" 'dir))
;; Use file-truename to convert 8+3 aliases in $TEMP value on
;; MS-Windows into their long file-name equivalents, which is
;; necessary for the 'equal' and 'string=' comparisons below. This
;; also resolves any symlinks, which cannot be bad for the same
;; reason. (An alternatrive solution would be to use file-equal-p,
;; but I'm too lazy to do that, as one of the tests compares a
;; list.)
(let* ((temp-dir (file-truename (make-temp-file "reftex-parse" 'dir)))
(tex-file (expand-file-name "test.tex" temp-dir))
(bib-file (expand-file-name "ref.bib" temp-dir)))
(with-temp-buffer