R/zzz.R

In pierucci/rgho: Access WHO Global Health Observatory Data from R

.onLoad <- function(libname, pkgname) {
  op <- options()
  op.rgho <- list(
    rgho.verbose = FALSE,
    rgho.retry = 5,
    rgho.memotime = 3600,
    rgho.http_proxy = NULL,
    rgho.n = 6
  )
  toset <- !(names(op.rgho) %in% names(op))
  if(any(toset)) options(op.rgho[toset])

  invisible()
}