applies suspendWhenHidden FALSE to the selector container too

Boehringer-Ingelheim · Jul 30, 2024 · 039f6e3 · 039f6e3
1 parent 8a9c34c
commit 039f6e3
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/mod_patient_profile.R b/R/mod_patient_profile.R
@@ -88,6 +88,8 @@ mod_patient_profile_server <- function(id, subject_level_dataset, extra_datasets
         return(res)
       })
 
+      outputOptions(output, "ui", suspendWhenHidden = FALSE)
+
       output[["selector"]] <- shiny::renderUI({
         subject_level_dataset <- subject_level_dataset()
         shiny::req(subject_level_dataset, cancelOutput = TRUE)