Avoid subr test failure when source dir has multiple names

* test/lisp/subr-tests.el (subr-tests--this-file):
Use the true name of the file.  The following test does a string
comparison of this value with that from method-files, which uses
load-history, which contains true names.
This commit is contained in:
Glenn Morris 2017-05-30 21:01:56 -04:00
parent e3b51b080f
commit 855b3e700f

View file

@ -298,7 +298,8 @@ cf. Bug#25477."
(cl-defmethod subr-tests--generic ((x integer))
(message "%s is a number" x))
(cl-defgeneric subr-tests--generic-without-methods (x y))
(defvar subr-tests--this-file (or load-file-name buffer-file-name))
(defvar subr-tests--this-file
(file-truename (or load-file-name buffer-file-name)))
(ert-deftest subr-tests--method-files--finds-methods ()
"`method-files' returns a list of files and methods for a generic function."