adding extra test for rnag

ropensci · May 10, 2019 · 775e6cb · 775e6cb
1 parent 01ef9d3
commit 775e6cb
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/tests/testthat/test-get_rnag.r b/tests/testthat/test-get_rnag.r
@@ -58,3 +58,8 @@ test_that("specifying type for WB download returns a message", {
   # retrieve data for level that does not exist
   expect_message(get_rnag("GB112071065700", "WBID", type="River"))
 })
+
+test_that("downloading empty dataframe (no RNAG) returns a message", {
+  # retrieve data for OC without RNAG
+  expect_message(get_rnag("Cornwall North Coastal", "OC", startyr = 2016))
+})