 (defn nav-item
   []
   (let [mouse-over? (reagent/atom false)]
-    (fn [tab selected-tab-id]
+    (fn [tab selected-tab-id on-select-tab]
       (let [selected (= @selected-tab-id (:id tab))]
       [:div
        {:style {:color            (if selected "#111")

                   :h-scroll :off
                   :child [v-box
                           :children [[re-com-title]
                                      [left-side-nav-bar selected-tab-id]]]]
                  [scroller
                   :child [box
                           :size      "auto"



(defn left-side-nav-bar
  [selected-tab-id on-select-tab]
    [v-box
     :children (for [tab tabs-definition]
                 [nav-item tab selected-tab-id on-select-tab])])


(defn re-com-title
