R/ojo_disconnect_all.R

In openjusticeok/ojo: Access and analyze data from the Open Justice Oklahoma database

Defines functions ojo_disconnect_all

Documented in ojo_disconnect_all

#' Close all connections to the \code{ojo} database
#'
#' @examples
#' ojo_disconnect_all()


ojo_disconnect_all <- function() {
  lapply(dbListConnections(dbDriver(drv = "MySQL")), dbDisconnect)
}