From 2f0dafba51b0da8ab8db1df185a79a027fe68f8f Mon Sep 17 00:00:00 2001 From: Peter DeWitt Date: Thu, 19 Sep 2024 11:44:03 -0600 Subject: [PATCH] improve testing --- tests/test-build_r_pkg.R | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/tests/test-build_r_pkg.R b/tests/test-build_r_pkg.R index 13fccb9..f16f416 100644 --- 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") + ) ) )