Build before confirming submission

jmtaylor-fhcrc · Dec 17, 2018 · 8e1818c · 8e1818c
1 parent a6bbe87
commit 8e1818c
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/R/release.R b/R/release.R
@@ -300,12 +300,13 @@ submit_cran <- function(pkg = ".", args = NULL) {
     return(invisible())
   }
 
-  if (yesno("Ready to submit to CRAN?")) {
+  pkg <- as.package(pkg)
+  built_path <- build_cran(pkg, args = args)
+
+  if (yesno("Ready to submit ", pkg$package, " (", pkg$version, ") to CRAN?")) {
     return(invisible())
   }
 
-  pkg <- as.package(pkg)
-  built_path <- build_cran(pkg, args = args)
   upload_cran(pkg, built_path)
 
   flag_release(pkg)