R/zzz.R

In rdnb: R Interface to the 'Deutsche Nationalbibliothek (German National Library) API'

.onAttach <- 
function(libname, pkgname) {
    ver <- read.dcf(file=system.file("DESCRIPTION", package=pkgname), fields="Version")
    packageStartupMessage(" ")
    packageStartupMessage(paste("This is", pkgname, ver))
    packageStartupMessage(" ")
    packageStartupMessage("Type changes(\"rdnb\") to see changes/bug fixes, help(rdnb) for documentation")
    packageStartupMessage("or citation(\"rdnb\") for how to cite rdnb.")
    packageStartupMessage(" ")
}

.onLoad <- 
function(libname, pkgname) {
  options(rdnb_show_url=FALSE)
}

#' @title View changes notes.
#' @description \code{changes} brings up the NEWS file of the package. 
#'
#' @param pkg Set to the default "rdnb". Other packages make no sense.
#' @export
#' @examples
#' \dontrun{
#' changes()
#' }
changes <- 
function(pkg="rdnb") {
    if(pkg=="rdnb") file.show(file.path(system.file(package="rdnb"), "NEWS"))
}