R/get_telegram_token.R

In petermeissner/telegramme: Helpers for handling telegram chats

Defines functions get_telegram_token

Documented in get_telegram_token

#' read telegram bot token
#'
#' @export
#'
get_telegram_token <- function(name = NULL){
  if ( is.null(name) ){
    res <- Sys.getenv("telegram_bot_token")
  } else {
    res <- Sys.getenv(name)
  }

  # return
  res
}