# NOT RUN {
repo <- fake_repo()
nest_commits_by_pattern(repo)
# With table of correspondence
pattern.table <- data.frame(
number = c("#2", "#1", "#1000"),
title = c("#2 A second issue to illustrate a blog post",
"#1 An example of issue",
"#1000 issue with no commit"))
nest_commits_by_pattern(
repo,
pattern.table = pattern.table,
pattern = c("Tickets" = "ticket[[:digit:]]+", "Issues" = "#[[:digit:]]+"))
# }
Run the code above in your browser using DataLab