render output to document

4 years ago · 73b739e594
parent f3c9b3bd99
commit 73b739e594
2 changed files with 11 additions and 2 deletions
--- a/public/index.html
+++ b/public/index.html
@ -5,7 +5,9 @@
    <title>masto-embed</title>
  </head>
  <body>
-    <div id="root"></div>
+    <div id="mastodon-timeline">
+      Here the timeline will appear.
+    </div>
    <script src="js/main.js"></script>
  </body>
 </html>
--- a/src/main/dda/masto_embed/app.cljs
+++ b/src/main/dda/masto_embed/app.cljs
@ -49,5 +49,12 @@
              (exit-with-error error)
              (callback response)))))

+(defn render-to-document
+  [input]
+  (-> js/document
+      (.getElementById "mastodon-timeline")
+      (.-innerHTML)
+      (set! input)))
+
 (defn init []
-  (get-mastodon-timeline pprint))
+  (get-mastodon-timeline render-to-document))