Removal of RPostgres to support connection strings and use consistent…

… approach
OHDSI · Jul 30, 2024 · 1fb0f18 · 1fb0f18
1 parent a3e3a1c
commit 1fb0f18
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 15 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -35,7 +35,6 @@ Suggests:
   testthat (>= 3.0.0),
   RSQLite,
   duckdb,
-  RPostgres,
   knitr,
   rmarkdown,
   keyring,

diff --git a/R/PooledConnectionHandler.R b/R/PooledConnectionHandler.R
@@ -37,20 +37,6 @@ requiredPackage <- function(packageName) {
       dbname = cd$server()
     )
   },
-  "postgresql" = function(cd) {
-    requiredPackage("RPostgres")
-    host <- strsplit(cd$server(), "/")[[1]][1]
-    dbname <- strsplit(cd$server(), "/")[[1]][2]
-    list(
-      drv = RPostgres::Postgres(),
-      dbname = dbname,
-      host = host,
-      user = cd$user(),
-      port = cd$port(),
-      password = cd$password(),
-      options = "sslmode=require"
-    )
-  },
   "duckdb" = function(cd) {
     requiredPackage("duckdb")
     list(