From 8d4971d02b037eb14cda3e88a5d4569b27fd6ec1 Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Sun, 10 Jun 2018 17:48:48 +0200
Subject: [PATCH] Remove vestigial reference to doom-module-table

---
 core/autoload/test.el | 51 +++++++++++++++++++++----------------------
 1 file changed, 25 insertions(+), 26 deletions(-)

diff --git a/core/autoload/test.el b/core/autoload/test.el
index 0a65a6c33..7a357a449 100644
--- a/core/autoload/test.el
+++ b/core/autoload/test.el
@@ -14,34 +14,33 @@ If neither is available, run all tests in all enabled modules."
     (doom-initialize t)
     (doom-initialize-modules t))
   (condition-case-unless-debug ex
-      (let* ((doom-modules (doom-module-table))
-             (target-paths
-              ;; Convert targets (either from MODULES or `argv') into a list of
-              ;; string paths, pointing to the root directory of modules
-              (cond ((stringp (car modules)) ; command line
-                     (save-match-data
-                       (cl-loop for arg in modules
-                                if (string= arg ":core") collect doom-core-dir
-                                else if (string-match-p "/" arg)
-                                nconc (cl-loop for dir in doom-modules-dirs
-                                               collect (expand-file-name arg dir))
-                                else
-                                nconc (cl-loop for dir in doom-modules-dirs
-                                               for path = (expand-file-name arg dir)
-                                               if (file-directory-p path)
-                                               nconc
-                                               (cl-remove-if-not
-                                                #'file-directory-p
-                                                (directory-files path t "^[^.]" t)))
-                                finally do (setq argv nil))))
+      (let ((target-paths
+             ;; Convert targets (either from MODULES or `argv') into a list of
+             ;; string paths, pointing to the root directory of modules
+             (cond ((stringp (car modules)) ; command line
+                    (save-match-data
+                      (cl-loop for arg in modules
+                               if (string= arg ":core") collect doom-core-dir
+                               else if (string-match-p "/" arg)
+                               nconc (cl-loop for dir in doom-modules-dirs
+                                              collect (expand-file-name arg dir))
+                               else
+                               nconc (cl-loop for dir in doom-modules-dirs
+                                              for path = (expand-file-name arg dir)
+                                              if (file-directory-p path)
+                                              nconc
+                                              (cl-remove-if-not
+                                               #'file-directory-p
+                                               (directory-files path t "^[^.]" t)))
+                               finally do (setq argv nil))))
 
-                    (modules ; cons-cells given to MODULES
-                     (cl-loop for (module . submodule) in modules
-                              if (doom-module-locate-path module submodule)
-                              collect it))
+                   (modules ; cons-cells given to MODULES
+                    (cl-loop for (module . submodule) in modules
+                             if (doom-module-locate-path module submodule)
+                             collect it))
 
-                    ((append (list doom-core-dir)
-                             (doom-module-load-path))))))
+                   ((append (list doom-core-dir)
+                            (doom-module-load-path))))))
         ;; Load all the unit test files...
         (dolist (path target-paths)
           (let ((test-path (expand-file-name "test/" path)))