adds unit test for #24 #25

ropensci · Jan 16, 2018 · b8d7dda · b8d7dda
1 parent ae1dcc9
commit b8d7dda
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/tests/testthat/test-opencage_get.R b/tests/testthat/test-opencage_get.R
@@ -6,3 +6,11 @@ test_that("opencage_get returns a response object",{
                               key = Sys.getenv("OPENCAGE_KEY"))),
             "response")
 })
+
+test_that("opencage_get returns a response object for Namibia NA countrycode",{
+  skip_on_cran()
+  expect_is(opencage_get(list(placename = "Windhoek",
+                              key = Sys.getenv("OPENCAGE_KEY"),
+                              country = "NA")),
+            "response")
+})