fix reactivity in set_available_teal_slices method

insightsengineering · Jul 31, 2023 · aeb84bf · aeb84bf
1 parent 6d781a6
commit aeb84bf
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/R/FilteredData.R b/R/FilteredData.R
@@ -152,8 +152,9 @@ FilteredData <- R6::R6Class( # nolint
       checkmate::assert_class(x, "reactive")
       private$available_teal_slices <- reactive({
         # Available filters should be limited to the ones relevant for this FilteredData.
-        allowed <- attr(self$get_filter_state(), "include_varnames")
-        forbidden <- attr(self$get_filter_state(), "exclude_varnames")
+        current_state <- isolate(self$get_filter_state())
+        allowed <- attr(current_state, "include_varnames")
+        forbidden <- attr(current_state, "exclude_varnames")
         foo <- function(slice) {
           if (slice$dataname %in% self$datanames()) {
             if (slice$fixed) {