|
|
|
|
@ -59,14 +59,15 @@
|
|
|
|
|
(raise-argument-error 'path->hash "symbols for doc and meta key" (cons doc-key meta-key)))
|
|
|
|
|
;; new namespace forces `dynamic-require` to re-instantiate 'path'
|
|
|
|
|
;; otherwise it gets cached in current namespace.
|
|
|
|
|
(parameterize ([current-namespace (make-base-namespace)]
|
|
|
|
|
(define new-ns (make-base-namespace))
|
|
|
|
|
(namespace-attach-module (namespace-anchor->namespace cache-utils-module-ns) 'pollen/setup new-ns)
|
|
|
|
|
(parameterize ([current-namespace new-ns]
|
|
|
|
|
[current-directory path-dir])
|
|
|
|
|
;; I monkeyed around with using the metas submodule to pull out the metas (for speed)
|
|
|
|
|
;; but in practice most files get their doc requested too.
|
|
|
|
|
;; so it's just simpler to get both at once and be done with it.
|
|
|
|
|
;; the savings of avoiding two cache fetches at the outset outweighs
|
|
|
|
|
;; the benefit of not reloading doc when you just need metas.
|
|
|
|
|
(namespace-attach-module (namespace-anchor->namespace cache-utils-module-ns) 'pollen/setup) ; brings in params
|
|
|
|
|
(define doc-missing-thunk (λ () ""))
|
|
|
|
|
(define metas-missing-thunk (λ () (hasheq)))
|
|
|
|
|
(list doc-key (dynamic-require path doc-key doc-missing-thunk)
|
|
|
|
|
|
