master 5312e56: Fix test failure in custom--test-theme-variables

[Lars Ingebrigtsen]

branch: master
commit 5312e56d43c82ab5e1c3fe407e24bdf1014e4313
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix test failure in custom--test-theme-variables
    
    * test/lisp/custom-tests.el (custom--test-theme-variables): "make
    check" in the main directory didn't work because the path was
    wrong.  Use EMACS_TEST_DIRECTORY to find the test directory
    instead.
---
 test/lisp/custom-tests.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/test/lisp/custom-tests.el b/test/lisp/custom-tests.el
index 7853c84..cabbf86 100644
--- a/test/lisp/custom-tests.el
+++ b/test/lisp/custom-tests.el
@@ -101,7 +101,9 @@
   "Test variables setting with enabling / disabling a custom theme."
   ;; We load custom-resources/custom--test-theme.el.
   (let ((custom-theme-load-path
-         `(,(expand-file-name "custom-resources" (file-name-directory #$)))))
+         `(,(expand-file-name
+            "custom-resources"
+            (expand-file-name "lisp" (getenv "EMACS_TEST_DIRECTORY"))))))
     (load-theme 'custom--test 'no-confirm 'no-enable)
     ;; The variables have still their initial values.
     (should (equal custom--test-user-option 'foo))