From e3d091da60a643de1f1bea898b642494da1ba758 Mon Sep 17 00:00:00 2001
From: Tony Garnock-Jones <tonygarnockjones@gmail.com>
Date: Fri, 6 Jan 2017 23:31:19 -0500
Subject: [PATCH] Exclude `main-distribution`, `main-tests` and `deprecated`
 from main page. See #22.

---
 src/site.rkt | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/site.rkt b/src/site.rkt
index f59cabf..4c71911 100644
--- a/src/site.rkt
+++ b/src/site.rkt
@@ -666,7 +666,9 @@
   (parameterize ((bootstrap-active-navigation nav-index)
                  (bootstrap-page-scripts (list (static-resource-url "/searchbox.js")
                                                (static-resource-url "/index.js"))))
-    (define package-name-list (package-search "" '((main-distribution #f))))
+    (define package-name-list (package-search "" '((main-distribution #f)
+                                                   (main-tests #f)
+                                                   (deprecated #f))))
     (authentication-wrap
      #:request request
      (if (and (not (rendering-static-page?)) (use-cache?))