NOrmalize paths for error messages?

phuse-org · Oct 28, 2021 · 7a56d39 · 7a56d39
1 parent 34df0b0
commit 7a56d39
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/tests/testthat/test-find_config.R b/tests/testthat/test-find_config.R
@@ -11,7 +11,7 @@ test_that("Find config when within a package with validation", {
     withr::with_dir(new = "example.package", {
       expect_equal(
         vt_find_config(),
-        file.path(getwd(), "vignettes","validation","validation.yml")
+        normalizePath(file.path(getwd(), "vignettes","validation","validation.yml"),winslash = "/")
       )
     })
   })
@@ -31,7 +31,9 @@ test_that("Find config when within a package with validation when working dir is
     withr::with_dir(new = "example.package", {
       expect_equal(
         vt_find_config(),
-        file.path(getwd(), "inst","validation","validation.yml")
+        normalizePath(
+          file.path(getwd(), "inst","validation","validation.yml"),
+          winslash = "/")
       )
     })
   })
@@ -50,7 +52,9 @@ test_that("Find config when within a validation packet", {
       withr::with_dir(new = "example_packet", {
         expect_equal(
           vt_find_config(),
-          file.path(getwd(), "validation","validation.yml")
+          normalizePath(
+            file.path(getwd(), "validation","validation.yml"),
+            winslash = "/")
         )
       })