diff --git a/src/cljs/ulysses/pages/builder.cljs b/src/cljs/ulysses/pages/builder.cljs index 263c545..7f665fc 100644 --- a/src/cljs/ulysses/pages/builder.cljs +++ b/src/cljs/ulysses/pages/builder.cljs @@ -54,6 +54,17 @@ (fn [v] (dispatch [:builder-filter-faculty-title-set v]))]) +(defn metric-slider + [metric filters] + (let [value (get-in filters [:metrics metric])] + [:div + ; [:div value "+"] + [range-slider + :min 0 :max 100 :value value + :on-change + (fn [v] + (dispatch [:builder-filter-faculty-metric metric v]))]])) + (defn sidebar-section [title & body] [:div.builder-panel-sidebar-section