diff --git a/R/dressing_room.R b/R/dressing_room.R
index ba5e20b..a1e1526 100644
--- a/R/dressing_room.R
+++ b/R/dressing_room.R
@@ -1246,8 +1246,11 @@ app_creator_feedback_server <- function(id, warning_messages, error_messages, ui
         if (length(error_messages()) == 0) res <- append(res, list(ui))
         return(res)
       })
+      shiny::outputOptions(output, "ui", suspendWhenHidden = FALSE)
     }
   )
 
+  
+
   return(module)
 }
diff --git a/R/mod_patient_profile.R b/R/mod_patient_profile.R
index da27b73..f4e8235 100644
--- a/R/mod_patient_profile.R
+++ b/R/mod_patient_profile.R
@@ -85,12 +85,16 @@ mod_patient_profile_server <- function(id, subject_level_dataset, extra_datasets
             )
           )
         }
+        message("PAPO UI")
         return(res)
       })
 
-      output[["selector"]] <- shiny::renderUI({
+      shiny::outputOptions(output, "ui", suspendWhenHidden = FALSE)
+
+      output[["selector"]] <- shiny::renderUI({        
         subject_level_dataset <- subject_level_dataset()
         shiny::req(subject_level_dataset, cancelOutput = TRUE)
+        message("PAPO SELECTOR")
         shiny::selectInput(ns("patient_selector"),
           label = "Select Patient ID:",
           selected = input[["patient_selector"]],
@@ -98,6 +102,8 @@ mod_patient_profile_server <- function(id, subject_level_dataset, extra_datasets
         )
       })
 
+      shiny::outputOptions(output, "selector", suspendWhenHidden = FALSE)
+
       # change selected patient based on sender_ids
       if (!is.null(sender_ids)) {
         lapply(sender_ids, function(x) {