tests/testthat/test-request_url.R

In Public-Health-Scotland/phsopendata: Extract Open Data from opendata.nhs.scot

test_that("returns correct URL format", {
  expect_equal(
    request_url("datastore_search", "id=doop"),
    "https://www.opendata.nhs.scot/api/3/action/datastore_search?id=doop"
  )

  expect_equal(
    request_url("dump", "id=doop"),
    "https://www.opendata.nhs.scot/datastore/dump/id=doop?bom=true"
  )
})

test_that("rejects invalid actions", {
  expect_error(
    request_url("beep", ""),
    regexp = "API call failed."
  )
})