From: Marco Baringer Date: Tue, 24 Jan 2006 15:24:45 +0000 (+0100) Subject: Typo: Use *run-test-when-defined* in test macro. (Reported by: Gary King ) --- diff --git a/src/test.lisp b/src/test.lisp index 7fed67d..af7225a 100644 --- 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))))