meissa/c4k-mastodon-bot
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

now the browser works

Browse source
This commit is contained in:
jem 2021-02-26 17:56:49 +01:00
parent d4f9437714
commit ced744ead1
1 changed files with 6 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/main/cljs/dda/k8s_mastodon_bot/browser.cljs
View file

@ -5,25 +5,23 @@
(defn config-from-document []
(-> js/document
(.getElementById "config")
(.-innerHTML)))
(.-value)))
(defn auth-from-document []
(-> js/document
(.getElementById "auth")
(.-innerHTML)))
(.-value)))
(defn render-to-document
[input]
(-> js/document
(.getElementById "output")
(.-innerHTML)
(.-value)
(set! input)))
(defn generate []
(-> (dda.k8s-mastodon-bot.core/generate (config-from-document) (auth-from-document))
(render-to-document)))
(defn init []
(-> js/document
(.getElementById "generate-button")
(.addEventListener "click" generate)))
(.addEventListener "click"
#(-> (core/generate (config-from-document) (auth-from-document))
(render-to-document)))))