Exclude main-distribution, main-tests and deprecated from main page. See .

This commit is contained in:
Tony Garnock-Jones 2017-01-06 23:31:19 -05:00
parent 56d435bf99
commit e3d091da60

View File

@ -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?))