R/zzz.R

In lorenzwalthert/fallback: Default values for function calls from yaml config files

.onLoad <- function(libname, pkgname) {
  op <- options()
  op.fallback <- list(
    fallback.verbose = 1L
  )
  toset <- !(names(op.fallback) %in% names(op))
  if (any(toset)) options(op.fallback[toset])
  invisible()
}