diff --git a/R/brms_tidiers.R b/R/brms_tidiers.R
index cf1281c..8ac2071 100644
--- a/R/brms_tidiers.R
+++ b/R/brms_tidiers.R
@@ -19,8 +19,8 @@
 #'     brms_crossedRE <- brm(mpg ~ wt + (1|cyl) + (1+wt|gear), data = mtcars,
 #'            iter = 500, chains = 2)
 #'  }
-#'  if (.Platform$OS.type!="windows" && require("brms")) {
-#'    ## too slow on Windows, skip (>5 seconds on r-devel-windows)
+#'  \donttest{
+#'    ## too slow for CRAN (>5 seconds)
 #'    ## load stored object
 #'    load(system.file("extdata", "brms_example.rda", package="broom.mixed"))
 #'
diff --git a/man/brms_tidiers.Rd b/man/brms_tidiers.Rd
index 7c082c7..6774ef3 100644
--- a/man/brms_tidiers.Rd
+++ b/man/brms_tidiers.Rd
@@ -124,8 +124,8 @@ At present, the components of parameter estimates are separated by parsing the c
     brms_crossedRE <- brm(mpg ~ wt + (1|cyl) + (1+wt|gear), data = mtcars,
            iter = 500, chains = 2)
  }
- if (.Platform$OS.type!="windows" && require("brms")) {
-   ## too slow on Windows, skip (>5 seconds on r-devel-windows)
+ \donttest{
+   ## too slow for CRAN (>5 seconds)
    ## load stored object
    load(system.file("extdata", "brms_example.rda", package="broom.mixed"))
 
diff --git a/tests/testthat/test-brms.R b/tests/testthat/test-brms.R
index b659116..c698f15 100644
--- a/tests/testthat/test-brms.R
+++ b/tests/testthat/test-brms.R
@@ -1,4 +1,3 @@
-
 stopifnot(require("testthat"), require("broom.mixed"))
 
 if (require(brms, quietly = TRUE) && require(rstanarm, quietly=TRUE)) {
@@ -7,8 +6,6 @@ if (require(brms, quietly = TRUE) && require(rstanarm, quietly=TRUE)) {
     mustWork = TRUE
     ))
 
-  context("brms models")
-
   ## GH #87
   tt <- suppressWarnings(tidy(brms_multi,conf.int=TRUE))
   expect_true(all(c("conf.low","conf.high") %in%