     (render-state [_ state]
       (html
        [:div {:class "row"}
-        [:div {:class "row"}
-         [:div {:class "col-sm-12"}
-          name]]
+        (om/build (editable-label :name) player)
         (om/build level-counter
                   level
                   {:init-state (select-keys state [:level-changed])})

             :on-click #(put! level-changed-c ::inc)}
            "+"]]])))))

(defmulti change-level identity)
(defmethod change-level ::inc [op] (fn [l] (if (< l 10) (inc l) l)))
(defmethod change-level ::dec [op] (fn [l] (if (> l 1) (dec l) l)))

  [{:keys [name level] :as player} owner]
  (reify
    om/IInitState
    (init-state [_]
      {:level-changed (chan)})
    om/IWillMount
    (will-mount [_]
      (let [level-changed-c (om/get-state owner :level-changed)]
