diff --git a/R/shinyDiagnostics.R b/R/shinyDiagnostics.R
index b37a5c1..ab19c41 100644
--- a/R/shinyDiagnostics.R
+++ b/R/shinyDiagnostics.R
@@ -64,7 +64,7 @@ shinyDiagnostics <- function(result,
   omopgenerics::exportSummarisedResult(result,
                                        fileName = "result.csv",
                                        path = file.path(directory, "shiny", "data", "raw"))
-  shiny::shinyAppDir(file.path(directory, "shiny"))
+  # shiny::shinyAppDir(file.path(directory, "shiny"))
   if (isTRUE(open)) {
   usethis::proj_activate(path = file.path(directory,"shiny"))
   }