     (= state :hide) "@"))
 
 (defn cell [end? x y mine state surround]
-;  (println "rending cell " x y)
+  (println "rending cell " x y)
   [:span.cell
    { :on-click #(click! x y)
      :on-context-menu  #(do (mark! x y ) false)

        end? (game :end) ] 
    (into 
      [:div.board-panel ] 
      (map game-row (repeat end? ) (range) (game :board) (game :states) (game :counts)))))

;; Render the root component
(defn ^:export start []

(defn game-row [end? x mines states surrounds]
;  (println "rending row " x)
  (into [:div.game-row ] 
        (map vector (repeat cell) (repeat end?) (repeat x) (range) mines states surrounds)));

(defn format [n]
  (let [s (str (max 0 n))]
