R/git_configure.R

#' Configure user.name and email for git
#' @param user.name Chris Someone
#' @param user.email someone[at]somewhere.com
#' @return output from git
#' @export
#' 
git.configure <- function(user.name,user.email){
  
  git_binary_path <- git_path(NULL)
  
  user.email <- system2(git_binary_path,paste("config --global user.email", shQuote(user.email)))
  user.name  <- system2(git_binary_path,paste("config --global user.name",  shQuote(user.name)))
  
  return(list(user.email,user.name))
  
}
gelfondjal/IT2 documentation built on May 17, 2019, 12:15 a.m.