improve existing test to expose problematic behavior

Author: lorenzwalthert

tests/testthat/test-cache-high-level-api.R

@@ -117,7 +117,7 @@ capture.output(test_that("no speedup when tranformer changes", {
   fresh_testthat_cache()
   t1 <- tidyverse_style()
   first <- system.time(style_text(text, transformers = t1))
-  t1$use_raw_indention <- !t1$use_raw_indention
+  t1 <- tidyverse_style(indent_by = 4)
   second <- system.time(style_text(text, transformers = t1))
   expect_false(first["elapsed"] / 2 > second["elapsed"])
 }))