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

(defonce app-state (atom {:likes 0})) ;that way figwheel will not ruin your state on reload


(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"]
                   [:a {:href "#" :onClick #(swap! data update-in [:likes] dec)} "Dec it"] ]]))



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


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

(render!)