Release blastula 0.3.2 (#210)

* Update DESCRIPTION and NEWS.md * Remove links from NEWS.md * Update test-integration.R * Fix unit test * Update .travis.yml * Update .travis.yml Co-authored-by: Joe Cheng <[email protected]>
rstudio · May 19, 2020 · 4e8cc16 · 4e8cc16
1 parent 23e760e
commit 4e8cc16
Show file tree

Hide file tree

Showing 4 changed files with 18 additions and 16 deletions.
diff --git a/.travis.yml b/.travis.yml
@@ -28,17 +28,16 @@ jobs:
     - stage: deploy
       name: covr
       r: release
-      r_binary_packages:
-        - covr
       script:
+        - Rscript -e "remotes::install_cran('covr')"
         - Rscript -e "covr::codecov()"
 
     - stage: deploy
       name: pkgdown
       r: release
       if: branch IN (master, travis) AND repo = rich-iannone/blastula AND type = push
       script:
-      - Rscript -e "remotes::install_cran(c('pkgdown', 'devtools'))"
+      - Rscript -e "remotes::install_cran(c('pkgdown', 'devtools', 'covr')"
       - Rscript -e "devtools::install()"
       - Rscript -e "Sys.setenv(FULLNAME = 'Richard Iannone'); pkgdown::build_site()"
       - Rscript -e "remove.packages(devtools::as.package('.')$package)"

diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Type: Package
 Package: blastula
 Title: Easily Send HTML Email Messages
-Version: 0.3.1.9001
+Version: 0.3.2
 Authors@R: c(
     person("Richard", "Iannone", role = c("aut", "cre"), email = "[email protected]",
            comment = c(ORCID = "0000-0003-3925-190X")),

diff --git a/NEWS.md b/NEWS.md
@@ -1,10 +1,14 @@
-# blastula (development version)
+# blastula 0.3.2
 
-* Added the `creds_envvar()` credential helper function, which allows for SMTP password input via an environment variable. [#159](https://github.com/rich-iannone/blastula/pull/159)
+* Email content width is now customizable in the `blastula_email()` and `compose_email()` functions. The default width is now increased to 1000px (#178).
 
-* Fixed incorrect rendering in Outlook, due to wrong line endings used for quoted-printable encoding. Thanks @jdbarillas for identifying the source of the issue! [#153](https://github.com/rich-iannone/blastula/pull/153)
+* Added the `delete_credential_key()` and `delete_all_credential_keys()` functions for better management of credential keys added to the system key-value store by the `create_smtp_creds_key()` function (#173).
 
-* Fixed Unicode issues on Windows. [#154](https://github.com/rich-iannone/blastula/pull/154)
+* Added the `creds_envvar()` credential helper function, which allows for SMTP password input via an environment variable (#159).
+
+* Fixed incorrect rendering in Outlook, due to wrong line endings used for quoted-printable encoding (thanks @jdbarillas for identifying the source of the issue in #153).
+
+* Fixed Unicode issues on Windows (#154).
 
 * Fixed buggy internal logic for decoding numeric HTML entities that represent non-ASCII characters.
 

diff --git a/tests/testthat/test-integration.R b/tests/testthat/test-integration.R
@@ -18,14 +18,10 @@ test_that("Email that uses all compose features", {
         ),
         # Work around the fact that ggplot2 doesn't render exactly the same
         # on different platforms
-        if (Sys.info()["sysname"] == "Linux") {
-          # On Linux, actually do the thing, to make sure this logic gets tested
-          # somewhere at least (and Linux is ideal because it's where we have
-          # the most CI coverage).
-          add_ggplot(ggplot(cars, aes(speed, dist)) + geom_point() + ggtitle("A Plot"))
-        } else {
-          add_image(test_path("ggplot.png"), alt = "A Plot", width = 500)
-        }
+        # 2020-05-08: We can't ever call add_ggplot directly because even on
+        # Linux-only we were seeing differences between Joe's desktop and travis
+        # add_ggplot(ggplot(cars, aes(speed, dist)) + geom_point() + ggtitle("A Plot"))
+        add_image(test_path("ggplot.png"), alt = "A Plot", width = 500)
       )
     )),
     block_text(md(
@@ -94,5 +90,8 @@ test_that("Email that uses all compose features", {
   # that contain \r\n
   eml_raw <- gsub("\r\n", "\n", eml_raw)
 
+  # cat("\n")
+  # cat(eml_raw)
+
   snapshot(eml_raw, print = cat)
 })