         :class "nav-item"
         :on-mouse-over (handler-fn (reset! mouse-over? true))
         :on-mouse-out  (handler-fn (reset! mouse-over? false))
-        :on-click      (handler-fn (reset! selected-tab-id (:id tab)))
+        :on-click      (handler-fn (on-select-tab (:id tab)))
         }
        [:span
         {:style {:cursor "default"}}    ;; removes the I-beam over the label

                   :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
