fix: reset of slider state on toggle

insightsengineering · Oct 15, 2024 · 902fb40 · 902fb40
1 parent fec1599
commit 902fb40
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/R/toggleable_slider.R b/R/toggleable_slider.R
@@ -213,10 +213,8 @@ toggle_slider_server <- function(id, is_dichotomous_slider = TRUE, step_slider =
         state_low$value <- state_low$value[[1]]
         state_high$value <- state_high$value[[2]]
       }
-      if (input$toggle %% 2 == 0) {
-        state_slider$max <- max(state_slider$max, state_slider$value[2])
-        state_slider$min <- min(state_slider$min, state_slider$value[1])
-      }
+      state_slider$max <- max(state_slider$max, state_slider$value[2])
+      state_slider$min <- min(state_slider$min, state_slider$value[1])
       list(
         low = state_low,
         high = state_high,