add test for duckdb without specifying pathToDriver or JAR folder

OHDSI · Oct 15, 2023 · 57dbb72 · 57dbb72
1 parent 70ce98f
commit 57dbb72
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/tests/testthat/test-duckdb.R b/tests/testthat/test-duckdb.R
@@ -9,6 +9,20 @@ test_that("Open and close duckdb connection", {
   unlink(databaseFile)
 })
 
+test_that("Open and close duckdb without DATABASECONNECTOR_JAR_FOLDER", {
+  withr::with_envvar(
+    new=c("DATABASECONNECTOR_JAR_FOLDER"=""),
+    {
+    databaseFile <- tempfile()
+    connection <- DatabaseConnector::connect(dbms = "duckdb", server = databaseFile)
+    expect_s4_class(connection, "DatabaseConnectorDbiConnection")
+    disconnect(connection)
+    unlink(databaseFile)
+    }
+
+  )
+})
+
 test_that("Insert and retrieve dates from duckdb", {
   databaseFile <- tempfile()
   connection <- DatabaseConnector::connect(dbms = "duckdb", server = databaseFile)