R/extract_repo_name.R

In thisisnic/noticeboard:

#' Extract Repo Name from URL
#' 
#' @param url URL to extract repo name from
#' 
#' @import stringr
extract_repo_name <- function(url){
  stringr::str_remove_all(url, "https://github.com/|(issues.*)") %>%
    stringr::str_remove(".*?/|") %>%
    stringr::str_remove("/")
}