diff --git a/admin/cus-test.el b/admin/cus-test.el
index b86643a769a..96f0c1ff0c4 100644
--- a/admin/cus-test.el
+++ b/admin/cus-test.el
@@ -424,7 +424,12 @@ cus-test-deps
   (mapatoms
    ;; This code is mainly from `custom-load-symbol'.
    (lambda (symbol)
-     (let ((custom-load-recursion t))
+     (let ((custom-load-recursion t)
+           (load-path
+            (cons
+             (expand-file-name
+              "quail" (file-name-directory (locate-library leim-list-file-name)))
+             load-path)))
        (dolist (load (get symbol 'custom-loads))
 	 (cond
 	  ((symbolp load)