diff --git a/DESCRIPTION b/DESCRIPTION index ba54e43..0203d13 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: peekbankr Type: Package Title: Accessing the Peekbank Database -Version: 0.1.1.9007 +Version: 0.1.1.9008 Authors@R: c( person("Mika", "Braginsky", email = "mika.br@gmail.com", role = c("aut", "cre")), person("Kyle", "MacDonald", email = "kylem412@gmail.com", role = "aut"), @@ -23,9 +23,9 @@ Imports: magrittr (>= 2.0.1), purrr (>= 0.3.4), rlang (>= 0.4.10), - RMySQL (>= 0.10.21), tidyr (>= 1.1.2), - stringr (>= 1.5.1) + stringr (>= 1.5.1), + RMariaDB (>= 1.3.2) Suggests: knitr, rmarkdown diff --git a/R/peekbankr.R b/R/peekbankr.R index cb6f113..f25417d 100644 --- a/R/peekbankr.R +++ b/R/peekbankr.R @@ -3,6 +3,8 @@ #' @importFrom rlang .data NULL +options(warn=-1) + pkg_globals <- new.env() pkg_globals$SAMPLE_RATE <- 40 # Hz @@ -80,12 +82,14 @@ connect_to_peekbank <- function(db_version = "current", db_args = NULL, compress = TRUE) { db_info <- get_db_info() - flags <- if (compress) RMySQL::CLIENT_COMPRESS else 0 + + flags <- if (compress) RMariaDB::CLIENT_COMPRESS else 0 if (is.null(db_args)) db_args <- db_info + DBI::dbConnect( - RMySQL::MySQL(), + RMariaDB::MariaDB(), host = db_args$host, dbname = translate_version(db_version, db_args, db_info), user = db_args$user,