Merge pull request #347 from rstudio/v0.3.6-rc

Release blastula v0.3.6

Author: rich-iannone

.Rbuildignore

@@ -18,3 +18,5 @@ man/figures/
 tests/testthat/test-add_readable_time.R
 tests/testthat/test-utils.R
 tests/testthat/test-html_manip.R
+tests/testthat/test-mime.R
+tests/testthat/test-credentials.R

DESCRIPTION

@@ -1,6 +1,6 @@
 Type: Package
 Package: blastula
-Version: 0.3.5.9000
+Version: 0.3.6
 Title: Easily Send HTML Email Messages
 Description: Compose and send out responsive HTML email messages that render
     perfectly across a range of email clients and device sizes. Helper functions
@@ -51,7 +51,7 @@ Suggests:
     withr
 SystemRequirements: pandoc (>= 1.12.3) - http://pandoc.org
 Encoding: UTF-8
-RoxygenNote: 7.3.1
+RoxygenNote: 7.3.2
 Roxygen: list(markdown = TRUE)
 Config/testthat/edition: 3
 Language: en-US

NAMESPACE

@@ -1,8 +1,12 @@
 # Generated by roxygen2: do not edit by hand
 
 S3method(format,blastula_creds)
+S3method(print,article)
 S3method(print,blastula_creds)
 S3method(print,blastula_message)
+S3method(write_mime,default)
+S3method(write_mime,mime_multipart)
+S3method(write_mime,mime_part)
 export("%>%")
 export(add_attachment)
 export(add_cta_button)

NEWS.md

@@ -1,4 +1,10 @@
-# blastula (development version)
+# blastula 0.3.6
+
+* Fixed erroneous use of `sprintf()`. (#335, thanks @pabecer!)
+
+* Updated full product name of Connect. (#334, thanks @aronatkins!)
+
+* Updated several GHA workflows (#336). (#337)
 
 # blastula 0.3.5
 

R/block_articles.R

@@ -77,7 +77,10 @@ article <- function(
   )
 }
 
-# To allow articles to be snapshot tested using testthat::verify_output
+#' Allow articles to be snapshot tested using testthat::verify_output
+#'
+#' @noRd
+#' @export
 print.article <- function(x, ...) {
   print(x(NULL))
 }

R/mime.R

@@ -275,6 +275,8 @@ write_mime <- function(out, x) {
   UseMethod("write_mime", x)
 }
 
+#' @noRd
+#' @export
 write_mime.mime_part <- function(out, x) {
   write_headers(out, x$headers)
 
@@ -290,6 +292,8 @@ write_mime.mime_part <- function(out, x) {
   out(crlf)
 }
 
+#' @noRd
+#' @export
 write_mime.mime_multipart <- function(out, x) {
 
   # headers, body_parts, boundary, preamble, epilogue
@@ -306,6 +310,8 @@ write_mime.mime_multipart <- function(out, x) {
   out(x$epilogue)
 }
 
+#' @noRd
+#' @export
 write_mime.default <- function(out, x) {
   stop("Not implemented for ", class(x))
 }