From 0c557fb3a0bb37f6d217c1d4bc9ff7dc6bb5c14e Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Wed, 10 Aug 2016 19:25:45 -0400 Subject: [PATCH] Don't mention test successes on the main page --- src/site.rkt | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/site.rkt b/src/site.rkt index 92237e6..8025348 100644 --- a/src/site.rkt +++ b/src/site.rkt @@ -651,8 +651,7 @@ ,@(for/list [(e (list (list failure-log-url "" "fails") (list success-log-url "" "succeeds") (list dep-failure-log-url "; has " "dependency problems") - (list test-failure-log-url "; has " "failing tests") - (list test-success-log-url "; " "tests pass")))] + (list test-failure-log-url "; has " "failing tests")))] (match-define (list u p l) e) (if u `(span ,p ,(buildhost-link u l)) `(span)))))