From 53047f29e801bdb5e854f6a204946e2070d61cc1 Mon Sep 17 00:00:00 2001 From: Marta Alcalde-Herraiz Date: Fri, 15 Nov 2024 14:50:53 +0000 Subject: [PATCH 1/2] Update shinyDiagnostics.R --- R/shinyDiagnostics.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/shinyDiagnostics.R b/R/shinyDiagnostics.R index 6fe365e..b37a5c1 100644 --- a/R/shinyDiagnostics.R +++ b/R/shinyDiagnostics.R @@ -64,9 +64,9 @@ 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(directory) + usethis::proj_activate(path = file.path(directory,"shiny")) } return(invisible()) From b12509fdfc8a1bd9cd2873a9a1a2642bb21ddadb Mon Sep 17 00:00:00 2001 From: Marta Alcalde-Herraiz Date: Fri, 15 Nov 2024 15:07:09 +0000 Subject: [PATCH 2/2] Update shinyDiagnostics.R --- R/shinyDiagnostics.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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")) }