if (FALSE) {
myrepo <- create_repo_ref('emilyriederer', 'myrepo')
post_issue(myrepo,
title = 'this is the issue title',
body = 'this is the issue body',
labels = c('priority:high', 'bug'))
}
if (FALSE) {
# can be used in conjunction with reprex pkg
# example assumes code for reprex is on clipboard
reprex::reprex(venue = "gh")
post_issue(myrepo,
title = "something is broken",
body = paste( clipr::read_clip(), collapse = "\n") )
}
Run the code above in your browser using DataLab