Kludge to keep on CRAN pending more info on cause of warning

jacob-long · Sep 2, 2021 · e655636 · e655636
1 parent 8829c06
commit e655636
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: jtools
 Type: Package
 Title: Analysis and Presentation of Social Scientific Data
-Version: 2.1.3
+Version: 2.1.4
 Authors@R: person(c("Jacob","A."), "Long", email = "[email protected]",
   role = c("aut", "cre"), comment = c(ORCID = "0000-0002-1582-6214"))
 Description: This is a collection of tools that the author (Jacob) has written

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,7 @@
+# jtools 2.1.4
+
+* Fixed a test error.
+
 # jtools 2.1.3
 
 * Fixed an encoding error in the `movies` dataset.

diff --git a/tests/testthat/test-export-summs.R b/tests/testthat/test-export-summs.R
@@ -291,7 +291,7 @@ if (requireNamespace("brms") & requireNamespace("broom.mixed")) {
   bfit1 <- readRDS("brmfit.rds")
   mvfit <- readRDS("mvfit.rds")
   test_that("plot_coefs works with brms", {
-    expect_silent(print(plot_coefs(bfit1) + ggtitle("basic brms fit")))
+    expect_silent(print(suppressWarnings(plot_coefs(bfit1) + ggtitle("basic brms fit"))))
     expect_silent(print(suppressWarnings(plot_coefs(mvfit) + ggtitle("default mv brms fit"))))
     expect_silent(print(suppressWarnings(plot_coefs(mvfit, dpar = "sigma") +
                           ggtitle("default dv, dpar sigma mv brms fit"))))