Tweak status messages

r-lib · May 13, 2020 · 603662e · 603662e
1 parent 390ba91
commit 603662e
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/cloud.R b/R/cloud.R
@@ -114,7 +114,7 @@ cloud_fetch_results <- function(job_id = cloud_job(), pkg = ".") {
 
   dir.create(out_dir, showWarnings = FALSE, recursive = TRUE)
 
-  cli_alert_info("Downloading from AWS")
+  cli_alert_info("Syncing with S3")
   processx::run("aws", c("s3", "sync", aws_url, out_dir))
 
   cli_alert_info("Extracting results")
@@ -385,6 +385,8 @@ cloud_report <- function(job_id = cloud_job(), pkg = ".", file = "", all = FALSE
     results <- cloud_results(job_id, pkg)
   }
 
+  cli_alert_info("Generating reports")
+
   message("Writing summary to 'revdep/README.md'")
   cloud_report_summary(file = file.path(root, "README.md"), all = all, results = results, pkg = pkg)