                 }}
        [:.slider-container
         {:style {:height (px (:height (:observed headers)))}}
-        (slider-widget headers)
+        (slider-widget headers slider-control)
         ]]]]))
 
 

    (when-let [selected-row (h-code ((rows-by-code (:datasource ap))))]
      [:div
       [:h3 (:h-name selected-row)]
       [:.slider]
       (chart-cell selected-row 1)
       (interpretation selected-row)])))



;; returns a bootstrap slider mixin
(defn bs-slider [hashed-id change-key]
  {:did-mount (fn [state]
                (prn "mounting-slider")
                (let [slider (new js/Slider hashed-id
                                  (clj->js {
                                            :tooltip "hide"
                                            :min 0
                                            :max 1
                                            :step 0.1
                                            :value (:slider-axis-value @core/app)
                                            }))
                      handler #(do
                                 (put! event-bus [change-key (.getValue slider) %]))
                      state' (assoc state ::slider slider ::handler handler)]

                  (.on slider "slide" handler)
