lazy way to force git repo creation

force_git_repo.R

library(gert)
library(usethis)

create_git_repo <- function(path) {
  cat(path, "\n")
  d <- setwd(path)
  on.exit(setwd(d))
  
  git_init()
  use_git_ignore(usethis:::git_ignore_lines)
  git_add(".")
  git_commit_all("Initial commit")
}