Documented new argument for downloading latest only

bgcarlisle · Nov 28, 2023 · 112f43e · 112f43e
1 parent b58cfc4
commit 112f43e
Show file tree

Hide file tree

Showing 4 changed files with 32 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: cthist
 Title: Clinical Trial Registry History
-Version: 2.1.4
+Version: 2.1.5
 Authors@R: 
     person("Benjamin Gregory", "Carlisle", , "[email protected]", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0001-8975-0649"))

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,11 @@
+# cthist 2.1.5
+
+* Added argument `latest` to function `clinicaltrials_gov_download` to
+  allow downloading only the latest version for many clinical trial
+  registry entries
+
+---
+
 # cthist 2.1.4
 
 * Fix bug in which start date would erroneously return NA in some

diff --git a/man/clinicaltrials_gov_download.Rd b/man/clinicaltrials_gov_download.Rd
diff --git a/tests/testthat/clinicaltrials_gov_download_latest.R b/tests/testthat/clinicaltrials_gov_download_latest.R
@@ -0,0 +1,13 @@
+test_that("ClinicalTrials.gov history entries mass-download correctly", {
+    filename <- tempfile()
+    if (file.exists(filename)) {
+        file.remove(filename)
+    }
+    result <- clinicaltrials_gov_download(
+        c("NCT02329873"), filename, TRUE, TRUE
+    )
+    expect_equal(
+        result == TRUE || result == FALSE,
+        TRUE
+    )
+})