 			[:pre (pr-str booked)]
 		[:hr]
 		[:button 
-
 			{:onClick (fn[e] 
 				(swap! app-state assoc-in [:seats (.prompt js/window "use row-seat format like '1-39'" "1-39") :status] 
 					"pending")

(rum/defc seat-plan < rum/cursored rum/cursored-watch [app-state] 
	(let [seats (rum/cursor app-state [:seats])]

		[:div.seat-plan {:key "root"}
			[:div#parter {:key "parter"} 
				(rum/with-props seat-rows parter-rows "left" :rum/key (str "left_" (range-key parter-rows)))
				(rum/with-props seat-rows parter-rows "right" :rum/key (str "right_" (range-key parter-rows)))

;;;


(rum/defc seat < rum/cursored  [y x current] ;; < rum/cursored-watch
	(when (= "pending" (get @current :status))
			(swap! renders inc))

	[:div {:x x :y y 
		 	:class (str "seat " (get @current :status))
			} ""])


(rum/defc seat-col < rum/static [col]
