(ns hello_seymore.core
  (:require [sablono.core :as sab]))

(def app-state (atom { :likes 0}))


(defn like-seymore [data]
  (sab/html [:div
             [:h1 "Behold. The mighty counter. Clicked " (:likes @data) " times"]
             [:div [:a {:href "#"
                        :onClick #(swap! data update-in [:likes] inc)}
                    "Click it"]]]))



(defn render! []
  (.render js/React
           (like-seymore app-state)
           (.getElementById js/document "app")))


(add-watch app-state :on-change (fn [_ _ _ _] (render!)))

(render!)