R/zz.R

In moodymudskipper/refactor: Tools for Refactoring Code

.onLoad <- function(libname, pkgname) {
  op <- options()
  op.refactor <- list(
    refactor.value = TRUE,
    refactor.env = FALSE,
    refactor.time = FALSE,
    refactor.waldo = TRUE
  )
  toset <- !(names(op.refactor ) %in% names(op))
  if(any(toset)) options(op.refactor[toset])

  invisible(NULL)
}