R/zzz.R

Defines functions is_attached .onAttach

.onAttach <- function(libname, pkgname) {
  # needed <- core[!is_attached(core)]
  # if (length(needed) == 0)
  #   return()
  #
  crayon::num_colors(TRUE)
  metid_attach()
  #
  # if (!"package:conflicted" %in% search()) {
  #   x <- metid_conflicts()
  #   msg(metid_conflict_message(x), startup = TRUE)
  # }
  packageStartupMessage(paste0("metid ", metid_version, " (", update_date, ')'))
}

is_attached <- function(x) {
  paste0("package:", x) %in% search()
  
}
tidymass/metid documentation built on Sept. 4, 2023, 2:01 a.m.