PoC of head additions

nextjournal · Feb 8, 2023 · 7219298 · 7219298
1 parent e299639
commit 7219298
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/src/nextjournal/clerk/view.clj b/src/nextjournal/clerk/view.clj
@@ -44,7 +44,10 @@
    [:script {:type "module" :src (adjust-relative-path state (get-in state [:resource->url "/js/viewer.js"]))}]
    (hiccup/include-css "https://cdn.jsdelivr.net/npm/[email protected]/dist/katex.min.css")
    [:link {:rel "preconnect" :href "https://fonts.bunny.net"}]
-   (hiccup/include-css "https://fonts.bunny.net/css?family=fira-mono:400,700%7Cfira-sans:400,400i,500,500i,700,700i%7Cfira-sans-condensed:700,700i%7Cpt-serif:400,400i,700,700i")))
+   (hiccup/include-css "https://fonts.bunny.net/css?family=fira-mono:400,700%7Cfira-sans:400,400i,500,500i,700,700i%7Cfira-sans-condensed:700,700i%7Cpt-serif:400,400i,700,700i")
+   (get-in state [:resource->url :head-additions])))
+
+#_(swap! !resource->url assoc :head-additions (list [:style {:type "text/css"} "body { background-color: red !important; }"]))
 
 (defn ->html [{:as state :keys [conn-ws?] :or {conn-ws? true}}]
   (hiccup/html5

diff --git a/src/nextjournal/clerk/viewer.cljc b/src/nextjournal/clerk/viewer.cljc
@@ -997,6 +997,7 @@
                        (update :nextjournal/value (partial process-blocks viewers))
                        mark-presented))})
 
+
 (def viewer-eval-viewer
   {:pred viewer-eval?
    :var-from-def? true