                 (rest data))
         column-keys (keys headers)
         slider-axis-value (:slider-axis-value ap)  ]
+    (prn "calling table-head with " slider-axis-value)
     [:div
      #_(when (core/query-media? "screen")
 

                       (.destroy slider))
                     (dissoc state :slider :handler)))})

(rum/defcs slider-control < rum/static bs-slider [state event-bus value min max step]
  (when (:slider state) (.setValue (:slider state) ))
  [:#slider.slider
   [:input {:type "text"
            :data-slider-value value

                                                                 :step 0.01
                                                                 :value (:slider-axis-value @core/app)
                                                                 }))
                      handler #((do (put! event-bus [:slider-axis-value (.getValue slider)])))
                      state' (assoc state :slider slider :handler handler)]

                  (.on slider "slide" handler)
                  (.on slider "change" handler)
                  (prn state')
