racket/pkgs/racket-index/setup/materialize-user-docs.rkt
Matthew Flatt 2d4f3e2ac9 remove the "racket-pkgs" directory layer
The layer is now redundant, since everything left in "pkgs" is in the
"racket-pkgs" category.
2014-12-08 05:22:59 -07:00

15 lines
377 B
Racket

#lang racket/base
(require setup/setup
setup/dirs)
(provide materialize-user-docs)
(define (materialize-user-docs [wrap-setup (lambda (t) (t))])
(unless (file-exists? (build-path (find-user-doc-dir) "index.html"))
(wrap-setup
(lambda ()
(setup #:avoid-main? #t
#:make-doc-index? #t
#:force-user-docs? #t)))
(void)))