(defn counter2 [_]
  (let [*count (r/atom 2)]
    (fn [_]
      [:button
       {:on-click (fn [evt] (swap! *count my-inc))}
       @*count])))