tests/testthat/helper-connections.R

local_ext_conn <- function(env = parent.frame()) {
  dir <- withr::local_tempdir(.local_envir = env)
  conn <- conn_open()
  withr::defer(DBI::dbDisconnect(conn, shutdown = TRUE), envir = env)
  ext_set_dir(dir, conn)
  conn
}

Try the quak package in your browser

Any scripts or data that you put into this service are public.

quak documentation built on June 9, 2026, 5:09 p.m.