@@ -133,17 +133,12 @@ create_new_posts_with_content <- function(.data) {
133
133
create_new_posts_with_content(new_sessions )
134
134
create_new_posts_with_content(new_coffee_code )
135
135
136
-
137
-
138
-
139
-
140
136
# Create a GitHub Issue of the session ------------------------------------
141
137
142
138
post_gh_issue <- function (title , body , labels ) {
143
139
# Will need to set up a GitHub PAT via (I think) the function
144
140
# devtools::github_pat() in the console.
145
- # devtools:::rule("Posting GitHub Issues")
146
- cat(" Posting `" , title , " `\n\n " )
141
+ cat(" \n\n Posting `" , title , " `\n\n " )
147
142
if (! devtools ::: yesno(" Are you sure you want to post this event as an Issue?" )) {
148
143
gh :: gh(
149
144
" POST /repos/:owner/:repo/issues" ,
@@ -216,7 +211,6 @@ gh_issue_info_coffee_code <- function(.data) {
216
211
select(title , content , gh_labels )
217
212
}
218
213
219
-
220
214
create_gh_issues_coffee_code <- function (.data ) {
221
215
.data %> %
222
216
gh_issue_info_coffee_code() %> %
@@ -231,5 +225,3 @@ create_gh_issues_events <- function(.data) {
231
225
232
226
create_gh_issues_coffee_code(new_coffee_code )
233
227
create_gh_issues_events(new_sessions )
234
-
235
-
0 commit comments