Index: runs.scm
==================================================================
--- runs.scm
+++ runs.scm
@@ -266,13 +266,13 @@
 				  (string->symbol (test:get-state test-status))
 				  'failed-to-insert))
 		      ((failed-to-insert)
 		       (print "ERROR: Failed to insert the record into the db"))
 		      ((NOT_STARTED COMPLETED) ;; (cadr status is the row id for the run record)
-		       (if (and (equal? (test:get-state test-status) "COMPLETED")
-				(equal? (test:get-status test-status) "PASS")
-				(equal? (test:get-status test-status) "CHECK")
+		       (if (and (equal? (test:get-state test-status)  "COMPLETED")
+				(or (equal? (test:get-status test-status) "PASS")
+				    (equal? (test:get-status test-status) "CHECK"))
 				(not (args:get-arg "-force")))
 			   (print "NOTE: Not starting test " new-test-name " as it is state \"COMPLETED\" and status \"" (test:get-status test-status) "\", use -force to override")
 			   (let* ((get-prereqs-cmd (lambda ()
 						     (db-get-prereqs-not-met db run-id waiton))) ;; check before running ....
 				  (launch-cmd      (lambda ()