Added test

rOpenGov · Jan 28, 2024 · d7e4424 · d7e4424
1 parent efee629
commit d7e4424
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/tests/testthat/test-pxweb_interactive.R b/tests/testthat/test-pxweb_interactive.R
@@ -135,3 +135,13 @@ test_that(desc = "No value bug", {
   expect_silent(pxe <- pxweb:::pxweb_explorer.character(url))
   expect_output(pxweb:::print.pxweb_explorer(pxe), regexp = "\\[\\[HS-Number\\]\\]")
 })
+
+
+test_that(desc = "Fail on incorrect", {
+  # CRAN seem to run tests in parallel, hence API tests cannot be run on CRAN.
+  skip_on_cran()
+  skip_if_offline()
+
+  expect_error(pxweb_interactive("incorrect url"))
+})
+