26 lines
920 B
HTML
26 lines
920 B
HTML
<html>
|
|
<head>
|
|
<script src="../js/scittle.js" type="application/javascript"></script>
|
|
<script crossorigin src="https://unpkg.com/react@17/umd/react.production.min.js"></script>
|
|
<script crossorigin src="https://unpkg.com/react-dom@17/umd/react-dom.production.min.js"></script>
|
|
<script src="../js/scittle.reagent.js" type="application/javascript"></script>
|
|
<script type="application/x-scittle">
|
|
(require '[reagent.core :as r]
|
|
'[reagent.dom :as rdom])
|
|
|
|
(def state (r/atom {:clicks 0}))
|
|
|
|
(defn my-component []
|
|
[:div
|
|
[:p "Clicks: " (:clicks @state)]
|
|
[:p [:button {:on-click #(do (print :foo) (println :dude) (prn (with-out-str (prn :foo))) (swap! state update :clicks inc))}
|
|
"Click me!"]]])
|
|
|
|
(rdom/render [my-component] (.getElementById js/document "app"))
|
|
</script>
|
|
</head>
|
|
<body>
|
|
<div id="app"></div>
|
|
</body>
|
|
</html>
|