Hotpatch to automated test framework

vubiostat · Dec 11, 2024 · e8351ad · e8351ad
1 parent a0d402c
commit e8351ad
Show file tree

Hide file tree

Showing 5 changed files with 11 additions and 0 deletions.
diff --git a/tests/testthat/test-020-redcapConnection-ArgumentValidation.R b/tests/testthat/test-020-redcapConnection-ArgumentValidation.R
@@ -1,6 +1,7 @@
 context("redcapConnection Argument Validation")
 
 API_KEY <- rcon$token
+url     <- rcon$url   # Should not be required but it is
 
 #####################################################################
 # Argument Validation                                            ####

diff --git a/tests/testthat/test-020-redcapConnection-Functionality.R b/tests/testthat/test-020-redcapConnection-Functionality.R
@@ -12,6 +12,8 @@ API_KEY <-
     keyring::key_get('redcapAPI', testdb, 'API_KEYs')
   }
 
+url     <- rcon$url   # Should not be required but it is
+
 
 test_that("redcapApiConnection can be created",
           expect_class(

diff --git a/tests/testthat/test-024-unlockREDCap.R b/tests/testthat/test-024-unlockREDCap.R
@@ -3,6 +3,9 @@ context("unlockREDCap")
 library(mockery)
 library(curl)
 
+url     <- rcon$url   # Should not be required but it is
+
+
 h <- new_handle(timeout = 1L)
 redirect <- structure(
   list(url = "https://test.xyz/api/",

diff --git a/tests/testthat/test-050-makeApiCall.R b/tests/testthat/test-050-makeApiCall.R
@@ -3,6 +3,9 @@ context("makeApiCall Argument Validation")
 library(mockery)
 library(curl)
 
+url     <- rcon$url   # Should not be required but it is
+
+
 # Note: This file will only test that arguments fail appropriately, or
 # that submethods perform as expected. the makeApiCall function 
 # is ubiquitous throughout the package. If we break it, it's bound

diff --git a/tests/testthat/test-205-exportTypedRecords-offline-Functionality.R b/tests/testthat/test-205-exportTypedRecords-offline-Functionality.R
@@ -1,5 +1,7 @@
 context("Export Typed Records Offline Functionality")
 
+url     <- rcon$url   # Should not be required but it is
+
 load(file.path(test_path("testdata"), "RedcapProject_test_redcapAPI.Rdata"))
 
 suppressWarnings({