R/utils.R

In poissonconsulting/poispkgs: Attach Poisson Packages

Defines functions pkg_list_to_attach is_attached msg

msg <- function(...) {
  if (!isTRUE(getOption("poispkgs.quiet"))) {
    packageStartupMessage(...)
  }
}

is_attached <- function(pkg) {
  paste0("package:", pkg) %in% search()
}

pkg_list_to_attach <- function() {
  pkg_list
}