update paths

ref #539
OuhscBbmc · Oct 13, 2024 · d1094d0 · d1094d0
1 parent 9e077a2
commit d1094d0
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 7 deletions.
diff --git a/inst/misc/project-redirection.yml b/inst/misc/project-redirection.yml
@@ -62,6 +62,6 @@
     - decimal-comma: 57
     - decimal-dot: 58
     - validation-types-1: 59
-    - blank-for-gray-status: 0
+    - blank-for-gray-status: 60
     - checkboxes-1: 0
     - vignette-repeating: 0
diff --git a/tests/testthat/test-read-decimal-comma.R b/tests/testthat/test-read-decimal-comma.R
@@ -7,7 +7,7 @@ test_that("locale-dot-oneshot", {
   testthat::skip_on_cran()
   locale      <- readr::locale(decimal_mark = ".")
 
-  path_expected <- "test-data/decimal-dot/redcapr-specific/set-locale.R"
+  path_expected <- "test-data/projects/decimal-dot/redcapr-specific/set-locale.R"
   expected_outcome_message <- "\\d+ records and \\d+ columns were read from REDCap in \\d+(\\.\\d+\\W|\\W)seconds\\."
 
   returned_object <-
@@ -36,7 +36,7 @@ test_that("locale-dot-batch", {
   testthat::skip_on_cran()
   locale      <- readr::locale(decimal_mark = ".")
 
-  path_expected <- "test-data/decimal-dot/redcapr-specific/set-locale.R"
+  path_expected <- "test-data/projects/decimal-dot/redcapr-specific/set-locale.R"
   expected_outcome_message <- "\\d+ records and \\d+ columns were read from REDCap in \\d+(\\.\\d+\\W|\\W)seconds\\."
 
   returned_object <-
@@ -63,7 +63,7 @@ test_that("locale-dot-batch", {
 test_that("default-oneshot", {
   testthat::skip_on_cran()
 
-  path_expected <- "test-data/decimal-dot/redcapr-specific/set-locale.R"
+  path_expected <- "test-data/projects/decimal-dot/redcapr-specific/set-locale.R"
   expected_outcome_message <- "\\d+ records and \\d+ columns were read from REDCap in \\d+(\\.\\d+\\W|\\W)seconds\\."
 
   returned_object <-
@@ -90,7 +90,7 @@ test_that("default-oneshot", {
 test_that("default-batch", {
   testthat::skip_on_cran()
 
-  path_expected <- "test-data/decimal-dot/redcapr-specific/set-locale.R"
+  path_expected <- "test-data/projects/decimal-dot/redcapr-specific/set-locale.R"
   expected_outcome_message <- "\\d+ records and \\d+ columns were read from REDCap in \\d+(\\.\\d+\\W|\\W)seconds\\."
 
   returned_object <-

diff --git a/tests/testthat/test-read-decimal-dot.R b/tests/testthat/test-read-decimal-dot.R
@@ -34,7 +34,7 @@ test_that("locale-comma-oneshot", {
   credential  <- retrieve_credential_testing("decimal-comma")
   locale      <- readr::locale(decimal_mark = ",")
 
-  path_expected <- "test-data/decimal-comma/redcapr-specific/set-locale.R"
+  path_expected <- "test-data/projects/decimal-comma/redcapr-specific/set-locale.R"
   expected_outcome_message <- "\\d+ records and \\d+ columns were read from REDCap in \\d+(\\.\\d+\\W|\\W)seconds\\."
 
   returned_object <-
@@ -64,7 +64,7 @@ test_that("locale-comma-batch", {
   credential  <- retrieve_credential_testing("decimal-comma")
   locale      <- readr::locale(decimal_mark = ",")
 
-  path_expected <- "test-data/decimal-comma/redcapr-specific/set-locale.R"
+  path_expected <- "test-data/projects/decimal-comma/redcapr-specific/set-locale.R"
   expected_outcome_message <- "\\d+ records and \\d+ columns were read from REDCap in \\d+(\\.\\d+\\W|\\W)seconds\\."
 
   returned_object <-