|
|
@ -47,6 +47,7 @@
|
|
|
|
(or (select-from-metas (setup:here-path-key SOURCE-PATH-STRING) metas) 'unknown)))
|
|
|
|
(or (select-from-metas (setup:here-path-key SOURCE-PATH-STRING) metas) 'unknown)))
|
|
|
|
(if (bytes? doc) ; if main export is binary, just pass it through
|
|
|
|
(if (bytes? doc) ; if main export is binary, just pass it through
|
|
|
|
doc
|
|
|
|
doc
|
|
|
|
|
|
|
|
;; allows `require` in a template
|
|
|
|
(splicing-let-syntax ([require (make-rename-transformer #'local-require)])
|
|
|
|
(splicing-let-syntax ([require (make-rename-transformer #'local-require)])
|
|
|
|
(include-template #:command-char COMMAND-CHAR (file TEMPLATE-PATH-STRING))))))
|
|
|
|
(include-template #:command-char COMMAND-CHAR (file TEMPLATE-PATH-STRING))))))
|
|
|
|
(provide result)))))]))
|
|
|
|
(provide result)))))]))
|