R/zzz.R

Defines functions .onAttach

.onAttach <- function(libname, pkgname) {
  netrc <- ifelse(.Platform$OS.type == "windows", "~/_netrc", "~/.netrc")

  if (!file.exists(netrc) &&
    !exists("labkey.sessionCookieName") &&
    !exists("apiKey", where = Rlabkey:::.lkdefaults) &&
    Sys.getenv("ISR_login") == "") {
    packageStartupMessage("A .netrc file is required to connect to ImmuneSpace. For more information on how to create one, refer to the Configuration section of the introduction vignette.")
  }
}

Try the ImmuneSpaceR package in your browser

Any scripts or data that you put into this service are public.

ImmuneSpaceR documentation built on Nov. 8, 2020, 4:55 p.m.