do not output page options <style> tag if explicitly set to nil

This commit is contained in:
Gered 2017-04-02 13:21:28 -04:00
parent 9a1b0d9ed6
commit 17e8876070

View file

@ -66,8 +66,7 @@
(defn inject-options-into-html!
[^Document doc options]
(let [base-uri (->base-uri options)
head-tag (-> doc (.select "head") (.first))]
(append-page-options-style-tag! head-tag options)
(let [head-tag (-> doc (.select "head") (.first))]
(if (:page options) (append-page-options-style-tag! head-tag options))
(if (:include-base-css? options) (append-base-css-link-tag! head-tag))
doc))