diff --git a/DESCRIPTION b/DESCRIPTION index 47d9cf5..95a3d30 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,11 @@ Package: CopernicusMarine Type: Package Title: Search Download and Handle Data from Copernicus Marine Service Information +<<<<<<< work-in-progress +Version: 0.4.5.0002 +======= Version: 0.4.5.0001 +>>>>>>> master Authors@R: c(person("Pepijn", "de Vries", role = c("aut", "cre", "dtc"), email = "pepijn.devries@outlook.com", comment = c(ORCID = "0000-0002-7961-6646"))) diff --git a/NEWS.md b/NEWS.md index 265b5a3..e73920c 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,7 +1,8 @@ -CopernicusMarine v0.4.5.0001 +CopernicusMarine v0.4.5.0002 ------------- * Added more safeguards to vignette to pass CRAN checks + * Added more tests CopernicusMarine v0.4.5 ------------- diff --git a/tests/testthat/test_subset.r b/tests/testthat/test_subset.r index 65a0b00..211f2d0 100644 --- a/tests/testthat/test_subset.r +++ b/tests/testthat/test_subset.r @@ -146,4 +146,20 @@ test_that("Requests beyond available range produces warning", { progress = FALSE ) }, "'longitude' well beyond available range") +}) + +test_that("Subsetting time range can handle udunits", { + skip_on_cran() + has_account_details() + skip_if_offline("data.marine.copernicus.eu") + expect_no_error({ + result <- cms_download_subset( + product = "MEDSEA_MULTIYEAR_PHY_006_004", + layer = "cmems_mod_med_phy-tem_my_4.2km_P1Y-m", + variable = "bottomT", + region = c(xmin = 3, ymin = 42.5, xmax = 7, ymax = 44), + timerange = c("1998-01-01", "1999-01-01"), + progress = FALSE + ) + }) }) \ No newline at end of file