diff --git a/R/shinyDiagnostics.R b/R/shinyDiagnostics.R
index 6fe365e..ab19c41 100644
--- a/R/shinyDiagnostics.R
+++ b/R/shinyDiagnostics.R
@@ -66,7 +66,7 @@ shinyDiagnostics <- function(result,
                                        path = file.path(directory, "shiny", "data", "raw"))
   # shiny::shinyAppDir(file.path(directory, "shiny"))
   if (isTRUE(open)) {
-  usethis::proj_activate(directory)
+  usethis::proj_activate(path = file.path(directory,"shiny"))
   }
 
   return(invisible())