                                                                  :step 0.01
                                                                  :value (:slider-axis-value @core/app)
                                                                  }))
-                      handler #(put! event-bus [:slider-axis-value (.getValue slider)])
+                      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')

                       (.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

        (map-indexed key-with
                     [(slider-title headers)
                      (slider-labels)
                      (do
                        (prn "calling slider-control with " slider-axis-value)
                        (slider-control slider-axis-value event-bus 0 1 0.01))
                      (axis-container slider-axis-value)])]]]]))


