Naive counter

Author: nberger

src/om_tutorial/core.cljs

@@ -5,15 +5,22 @@
 
 (enable-console-print!)
 
-(defui HelloWorld
+(def app-state (atom {:count 0}))
+
+(defui Counter
   Object
   (render [this]
-    (dom/div nil (get (om/props this) :title))))
+    (let [{:keys [count]} (om/props this)]
+      (dom/div nil
+        (dom/span nil (str "Count: " count))
+        (dom/button
+          #js {:onClick
+               (fn [e]
+                 (swap! app-state update-in [:count] inc))}
+          "Click me!")))))
 
-(def hello (om/factory HelloWorld))
+(def reconciler
+  (om/reconciler {:state app-state}))
 
-(js/ReactDOM.render
-  (apply dom/div nil
-    (map #(hello {:title (str "Hello " %)})
-      (range 3)))
-  (gdom/getElement "app"))
+(om/add-root! reconciler
+  Counter (gdom/getElement "app"))