Merge pull request #562 from MichaelChirico/patch-1

Build message with paste0 to avoid extra spaces
r-hub · Jun 28, 2023 · 88f50d8 · 88f50d8
2 parents c0a3f31 + 5fa1148
commit 88f50d8
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/R/check.R b/R/check.R
@@ -90,11 +90,11 @@ assert_validated_email_for_check <- function(email) {
   if (is.null(code)) {
     if (is_interactive()) {
       cat("\n")
-      message(paste(collapse = "\n", strwrap(indent = 2, exdent = 2, paste(
-        sQuote(crayon::green(email)), "is not validated, or does not match",
-         "the package maintainer's email. To validate it now, please enter",
-        "the email address below. Note that R-hub will send a token to",
-        "this address. If the address does not belong to you, quit now by",
+      message(paste(collapse = "\n", strwrap(indent = 2, exdent = 2, paste0(
+        sQuote(crayon::green(email)), " is not validated, or does not match ",
+        "the package maintainer's email. To validate it now, please enter ",
+        "the email address below. Note that R-hub will send a token to ",
+        "this address. If the address does not belong to you, quit now by ",
         "pressing ", crayon::yellow("ENTER"), "."
       ))))
       cat("\n")