     om/IRenderState
     (render-state [_ state]
       (if-not (:track-expanded state)
-        (dom/tr nil (dom/td #js {:onClick #(om/set-state! owner :track-expanded true)} ">"))
+        (dom/tr nil (dom/td #js {:onClick #(om/set-state! owner :track-expanded true)
+                                 :style #js {:color "#999"}} ">"))
         (dom/tr nil
-                (dom/td #js {:onClick #(om/set-state! owner :track-expanded false)} "<")
+                (dom/td #js {:onClick #(om/set-state! owner :track-expanded false)
+                             :style #js {:color "#999"}} "<")
                 (dom/td nil
                  (dom/table nil
                   (apply dom/tr nil

      {:grid-expanded false})
    om/IRenderState
    (render-state [_ state]
      (dom/div nil
               (if-not (:grid-expanded state)
                 (dom/div nil (dom/p #js {:onClick #(om/set-state! owner :grid-expanded true)} "[+]"))
                 (dom/div nil (dom/p #js {:onClick #(om/set-state! owner :grid-expanded false)} "[-]")
                          (apply dom/table nil
                                 (om/build-all track-view (get cursor "tracks")
                                               {:state state}))))))))

    (render-state [_ state]
      (let [root (get (:grids cursor) "root")]
        (if root
          (dom/div #js {:style #js {:fontFamily "monospace"}}
                   (om/build grid-view root {:state (assoc state :ns "root")}))
          (dom/div nil "loading..."))))))
        
