R/zzz.R

.onAttach <- function(lib, pkg) {
    dcf <- read.dcf(file.path(lib, pkg, "DESCRIPTION"))
    msg <- gettextf("%s (%s)", dcf[, "Title"],
                    as.character(dcf[, "Version"]))
    packageStartupMessage(paste(strwrap(msg), collapse = "\n"))
}
jordanyoung630/simple-boot documentation built on May 23, 2019, 2:47 p.m.