test(quarto): fix ci running on windows

ropensci · Oct 30, 2024 · 52b8398 · 52b8398
1 parent 03848a3
commit 52b8398
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/tests/testthat/test-tar_quarto.R b/tests/testthat/test-tar_quarto.R
@@ -518,7 +518,14 @@ targets::tar_test("tar_quarto() reruns if target changes in included file", {
   expect_equal(sort(progress$name), sort(c("data", "report")))
   out <- targets::tar_read(report)
   out <- setdiff(out, "main_files")
-  expect_equal(sort(basename(out)), sort(c("main.html", "main.qmd", "file1.qmd")))
+  if (identical(tolower(Sys.info()[["sysname"]]), "windows")) {
+    expect_equal(
+      sort(file.path(basename(dirname(out)), basename(out))),
+      sort(c("./main.html", "./main.qmd", "./file1.qmd"))
+    )
+  } else {
+    expect_equal(sort(basename(out)), sort(c("main.html", "main.qmd", "file1.qmd")))
+  }
   # Should not rerun the report.
   suppressMessages(targets::tar_make(callr_function = NULL))
   progress <- targets::tar_progress()