Don't mention test successes on the main page

This commit is contained in:
Tony Garnock-Jones 2016-08-10 19:25:45 -04:00
parent ff4b4490e7
commit 0c557fb3a0

View File

@ -651,8 +651,7 @@
,@(for/list [(e (list (list failure-log-url "" "fails") ,@(for/list [(e (list (list failure-log-url "" "fails")
(list success-log-url "" "succeeds") (list success-log-url "" "succeeds")
(list dep-failure-log-url "; has " "dependency problems") (list dep-failure-log-url "; has " "dependency problems")
(list test-failure-log-url "; has " "failing tests") (list test-failure-log-url "; has " "failing tests")))]
(list test-success-log-url "; " "tests pass")))]
(match-define (list u p l) e) (match-define (list u p l) e)
(if u `(span ,p ,(buildhost-link u l)) `(span))))) (if u `(span ,p ,(buildhost-link u l)) `(span)))))