From 66058d990da7c0339694d0eb629f299a6c3fec3c Mon Sep 17 00:00:00 2001 From: Marco Baringer Date: Tue, 24 Jan 2006 16:24:45 +0100 Subject: [PATCH] Typo: Use *run-test-when-defined* in test macro. (Reported by: Gary King ) --- src/test.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)))) -- 1.7.10.4