We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 70a7edf + 87d9650 commit dbc5de0Copy full SHA for dbc5de0
pkg-r/tests/testthat/helper-fixtures.R
@@ -58,6 +58,10 @@ local_sqlite_connection <- function(
58
table_name = "test_table",
59
env = parent.frame()
60
) {
61
+ if (testthat::is_testing()) {
62
+ skip_if_not_installed("RSQLite")
63
+ }
64
+
65
temp_db <- withr::local_tempfile(fileext = ".db", .local_envir = env)
66
conn <- DBI::dbConnect(RSQLite::SQLite(), temp_db)
67
withr::defer(DBI::dbDisconnect(conn), envir = env)
0 commit comments