diff --git a/R/dbConnect_PqDriver.R b/R/dbConnect_PqDriver.R index a867b7a7..14614cf3 100644 --- a/R/dbConnect_PqDriver.R +++ b/R/dbConnect_PqDriver.R @@ -109,13 +109,12 @@ dbConnect_PqDriver <- function(drv, dbname = NULL, conn@timezone <- timezone conn@timezone_out <- timezone_out - typnames <- try(dbGetQuery(conn, "SELECT oid, typname FROM pg_type", immediate = TRUE), silent = TRUE) - - if (inherits(typnames, "try-error")) { - typnames <- data.frame(typname = character(), oid = character()) - } - - conn@typnames <- typnames + conn@typnames <- tryCatch( + dbGetQuery(conn, "SELECT oid, typname FROM pg_type", immediate = TRUE), + error = function(e) { + data.frame(typname = character(), oid = character()) + } + ) on.exit(NULL) conn