counter.cljs

(ns react-cljs.core
  (:require React))

(enable-console-print!)

(declare render-ui)

(defn render-counter [id state root]
  (let [cnt (or (get-in state [id :count]) 0)]
    (React/DOM.div nil
      (array
        (React/DOM.label nil cnt)
        (React/DOM.button
          (js-obj "onClick" #(root (assoc-in state [id :count] (inc cnt))))
          "+")
        (React/DOM.button
          (js-obj "onClick" #(root (assoc-in state [id :count] (dec cnt))))
          "-")))))

(defn render-ui [n]
  (letfn [(root [state]
            (React/renderComponent
              (React/DOM.div nil
                (into-array
                  (concat
                    [(React/DOM.h1 nil "A Counting Widget!")]
                    (map #(render-counter % state root) (range n)))))
              js/document.body))]
    (root (zipmap (range n) nil))))
 
(render-ui 10)

(zipmap (range 10) nil) returns {}