improve testing

dewittpe · Sep 19, 2024 · 2f0dafb · 2f0dafb
1 parent 69bd69a
commit 2f0dafb
Showing 1 changed file with 9 additions and 7 deletions.
diff --git a/tests/test-build_r_pkg.R b/tests/test-build_r_pkg.R
@@ -13,13 +13,15 @@ x <- as.character(x)
 stopifnot(
   identical(
     x, 
-    c("rcd14465", "rcd14465/DESCRIPTION", "rcd14465/LICENSE", "rcd14465/NAMESPACE", 
-    "rcd14465/R", "rcd14465/R/datasets.R", "rcd14465/data", "rcd14465/data/metadata.rda", 
-    "rcd14465/data/project.rda", "rcd14465/data/record.rda", "rcd14465/data/user.rda", 
-    "rcd14465/inst", "rcd14465/inst/raw-data", "rcd14465/inst/raw-data/metadata.rds", 
-    "rcd14465/inst/raw-data/project.rds", "rcd14465/inst/raw-data/record.rds", 
-    "rcd14465/inst/raw-data/user.rds", "rcd14465/man", "rcd14465/man/metadata.Rd", 
-    "rcd14465/man/project.Rd", "rcd14465/man/record.Rd", "rcd14465/man/user.Rd")
+    normalizePath(
+      c("rcd14465", "rcd14465/DESCRIPTION", "rcd14465/LICENSE", "rcd14465/NAMESPACE", 
+      "rcd14465/R", "rcd14465/R/datasets.R", "rcd14465/data", "rcd14465/data/metadata.rda", 
+      "rcd14465/data/project.rda", "rcd14465/data/record.rda", "rcd14465/data/user.rda", 
+      "rcd14465/inst", "rcd14465/inst/raw-data", "rcd14465/inst/raw-data/metadata.rds", 
+      "rcd14465/inst/raw-data/project.rds", "rcd14465/inst/raw-data/record.rds", 
+      "rcd14465/inst/raw-data/user.rds", "rcd14465/man", "rcd14465/man/metadata.Rd", 
+      "rcd14465/man/project.Rd", "rcd14465/man/record.Rd", "rcd14465/man/user.Rd")
+    )
   )
 )