Minimal blog

2026-05-02 09:56:31 +00:00 · 2020-07-14 19:17:19 +08:00
parent e5a1e55b42
commit 174bdc9dae
12 changed files with 527 additions and 185 deletions
--- a/web/src/main/frontend/extensions/code.cljs
+++ b/web/src/main/frontend/extensions/code.cljs
@@ -33,4 +33,10 @@
  (let [loading? (rum/react *loading?)]
    [:pre.pre-wrap-white-space.code
     [:code (assoc attr :id id)
-       code]]))
+      code]]))
+
+(defn html-export
+  [attr code]
+  [:pre
+   [:code attr
+    code]])