tests/testthat/test-download.R

test_that("Downloading without preper credentials raises an error", {
  random <- sample(letters, 8)
  expect_error(download(construct_url(717), user = random, password = random))
})
TIBHannover/BacDiveR documentation built on June 2, 2022, 2:51 p.m.