From a0d402ce2b7956c91f07d361114d57eedb519a28 Mon Sep 17 00:00:00 2001 From: Shawn Garbett Date: Wed, 11 Dec 2024 08:15:11 -0600 Subject: [PATCH 1/2] White space edit to trigger auto build/check --- README.md | 1 - 1 file changed, 1 deletion(-) diff --git a/README.md b/README.md index 8aec5f18..56c097c7 100644 --- a/README.md +++ b/README.md @@ -1,5 +1,4 @@ - [![DOI](https://zenodo.org/badge/DOI/10.5281/zenodo.10602052.svg)](https://doi.org/10.5281/zenodo.10602052) ![](https://cranlogs.r-pkg.org/badges/grand-total/redcapAPI) [![License: GPL v2](https://img.shields.io/badge/License-GPL_v2-blue.svg)](https://www.gnu.org/licenses/old-licenses/gpl-2.0.en.html) From e8351add3d1ebebcb0be9846f80a19f0993e8012 Mon Sep 17 00:00:00 2001 From: Shawn Garbett Date: Wed, 11 Dec 2024 09:12:49 -0600 Subject: [PATCH 2/2] Hotpatch to automated test framework --- tests/testthat/test-020-redcapConnection-ArgumentValidation.R | 1 + tests/testthat/test-020-redcapConnection-Functionality.R | 2 ++ tests/testthat/test-024-unlockREDCap.R | 3 +++ tests/testthat/test-050-makeApiCall.R | 3 +++ .../test-205-exportTypedRecords-offline-Functionality.R | 2 ++ 5 files changed, 11 insertions(+) diff --git a/tests/testthat/test-020-redcapConnection-ArgumentValidation.R b/tests/testthat/test-020-redcapConnection-ArgumentValidation.R index aac0b64e..990db563 100644 --- 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 index 1ad4d323..e52a5083 100644 --- 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 index 5b0936fa..7263ee17 100644 --- 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 index b10db39f..d4083140 100644 --- 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 index 7e2b47c5..256073f4 100644 --- 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({