X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Frun.lisp;h=1f0ed337711d05ca6d3759063ad89d998e618a94;hb=4b85e1a17c80d4c55bd7511dd8a90954a455ecd6;hp=286a7c40619d85e22f72b6a74c92b2d92d61a48b;hpb=03385bebe89688155b198f2f9afe34a0187126cd;p=fiveam.git

diff --git a/src/run.lisp b/src/run.lisp
index 286a7c4..1f0ed33 100644
--- a/src/run.lisp
+++ b/src/run.lisp
@@ -110,8 +110,7 @@ run."))
           (or  (satisfies-depends-p #'some))
           (not (satisfies-depends-p #'notany))
           (:before (every #'(lambda (dep)
-                              (let ((status (status (get-test dep))))
-                                (eql :unknown status)))
+                              (eql :unknown (status (get-test dep))))
                           (cdr depends-on)))))))
 
 (defun results-status (result-list)