R/app_prod.R

`%||%` <- function (x, y)
{
  if (is.null(x))
    y
  else x
}
#' return `TRUE` if in `production mode`
app_prod <- function(){
  getOption( "app.prod" ) %||% TRUE
}
ceparman/Lims1 documentation built on May 9, 2019, 8:13 a.m.