                                            :get-state-ch (:get-state-ch state)}]
                             (om/build grid-view {:id id :beat-cursors (second beat-cursors)} {:state sub-state})))))))))
 
-(defn grid-editor [{:keys [id cursor set-state-ch]} owner]
+(defn grid-editor [{:keys [name id cursor set-state-ch], :as inputs} owner]
   (reify
     om/IInitState
     (init-state [_]


(defn synths []
  (om/ref-cursor (:synths (om/root-cursor app-state))))

(defn handle-change [e owner state key]
  (om/set-state! owner key (.. e -target -value)))

                             (let [grid-id (new-id)
                                   grid {"name" ""
                                         "id" grid-id
                                         "bpc" "1"
                                         "tracks" []}]
                               (om/transact! cursor (fn [c] (assoc c
                                                                   "type" value
