tests/testthat/test-flaky_connect.R

In ndiquattro/flaky: Wrapper around an ODBC connection to SnowflakeDB and dbplyr backend

test_that("Unfound DSN throws an error", {
  expect_error(flaky_connect("fdkla;"))
})

test_that("Missing connection_string and DSN throws correct error", {
  expect_error(flaky_connect(), "No credentials were provided. Set dsn or connection_string argument.")
})