From 6db1a7bc605f7df834494bea47567001945f7693 Mon Sep 17 00:00:00 2001
From: Hadley Wickham <h.wickham@gmail.com>
Date: Tue, 7 Sep 2021 14:39:05 -0500
Subject: [PATCH] Quiet db test

---
 R/db.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/db.R b/R/db.R
index 5ac065ce..7168826b 100644
--- a/R/db.R
+++ b/R/db.R
@@ -25,7 +25,7 @@
 #' unlink(db)
 #' @export
 with_db_connection <- function(con, code) {
-  requireNamespace("DBI")
+  requireNamespace("DBI", quietly = TRUE)
 
   stopifnot(all(is.named(con)))
   stopifnot(all(vlapply(con, methods::is, "DBIConnection")))
@@ -42,7 +42,7 @@ with_db_connection <- function(con, code) {
 #' @rdname with_db_connection
 #' @export
 local_db_connection <- function(con, .local_envir = parent.frame()) {
-  requireNamespace("DBI")
+  requireNamespace("DBI", quietly = TRUE)
   stopifnot(methods::is(con, "DBIConnection"))
 
   defer(DBI::dbDisconnect(con), envir = .local_envir)