Typo: Use *run-test-when-defined* in test macro. (Reported by: Gary King <gwking...

diff --git a/src/test.lisp b/src/test.lisp
index 7fed67d..af7225a 100644 (file)
--- a/src/test.lisp
+++ b/src/test.lisp
@@ -60,7 +60,7 @@ SUITE defaults to the current value of *SUITE*."
                     ',name)
              `(setf (gethash ',name (tests (or *suite* (get-test 'NIL))))
                     ',name))
-         (when *run-when-defined*
+         (when *run-test-when-defined*
            (run! ',name))
         ',name))))