From fa1bd44e0a8ab7c96646ad883ab1dc833332012b Mon Sep 17 00:00:00 2001 From: xec-cm Date: Thu, 21 Dec 2023 08:18:38 +0100 Subject: [PATCH] debug win GHA --- R/longtests_rcolet.R | 5 ++++- R/utils_longtests_rcolet.R | 5 ++++- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/R/longtests_rcolet.R b/R/longtests_rcolet.R index 3818ba4..a3b11b6 100644 --- a/R/longtests_rcolet.R +++ b/R/longtests_rcolet.R @@ -142,7 +142,10 @@ roclet_output.roclet_longtests <- function(x, results, base_path, ...) { # Has side-effects: writes files to disk paths_longtests <- internal_longtests_roclet_output( results = results$longtests, - base_path = normalizePath(file.path(base_path, "longtests", "testthat")), + base_path = normalizePath( + file.path(base_path, "longtests", "testthat"), + mustWork = FALSE + ), prefix = "test-biocroxytest-longtests-" ) diff --git a/R/utils_longtests_rcolet.R b/R/utils_longtests_rcolet.R index 235e7f5..4985d90 100644 --- a/R/utils_longtests_rcolet.R +++ b/R/utils_longtests_rcolet.R @@ -222,7 +222,10 @@ internal_longtests_roclet_output <- function(results, paths <- names(results) for (i in seq_along(results)) { - path <- file.path(base_path, paste0(prefix, paths[i])) + path <- normalizePath( + file.path(base_path, paste0(prefix, paths[i])), + mustWork = FALSE + ) if (!made_by_biocroxytest(path)) { cli::cli_inform(c(