missing cr_email_set example

MarkEdmondson1234 · May 2, 2020 · 0f2ba88 · 0f2ba88
1 parent 63f474e
commit 0f2ba88
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 6 deletions.
diff --git a/R/init.R b/R/init.R
@@ -142,7 +142,7 @@ cr_email_get <- function(){
 #' @export
 #' @param cloudbuildEmail The Cloud Build service email
 #' @examples
-#'
+#' cr_email_set("[email protected]")
 #' cr_email_get()
 cr_email_set <- function(cloudbuildEmail){
   .cr_env$cloudbuildEmail <- cloudbuildEmail

diff --git a/R/setup_buildemail.R b/R/setup_buildemail.R
@@ -25,8 +25,9 @@ cr_setup_service <- function(account_email,
                           roles = roles,
                           projectId = projectId)
 
-  cli_alert_success("Configured {account_email} with roles: {the_roles}",
-                    the_roles = paste(roles, collapse = " "))
+  the_roles <- NULL
+  the_roles <- paste(roles, collapse = " ")
+  cli_alert_success("Configured {account_email} with roles: {the_roles}")
 }
 
 

diff --git a/cran-comments.md b/cran-comments.md
@@ -1,6 +1,6 @@
 ## Test environments
-* local R installation, R 3.6.1 on MacOS
-* ubuntu 16.04 (on travis-ci), R 3.6.1
+* local R installation, R 3.6.3 on MacOS
+* ubuntu 16.04 (on travis-ci), R 3.6.3
 * win-builder (devel)
 
 ## R CMD check results

diff --git a/man/cr_email_set.Rd b/man/cr_email_set.Rd