fix tests

r-lib · Jan 10, 2021 · 6624000 · 6624000
1 parent ff9455d
commit 6624000
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/R/transform-files.R b/R/transform-files.R
@@ -260,7 +260,7 @@ parse_transform_serialize_r <- function(text,
 transformers_subset_impl <- function(transformers, token, scope, code) {
   transformer_names <- names(token)
   for (i in seq_along(token)) {
-    if (!any(token[i] %in% code)) {
+    if (!any(token[[i]] %in% code)) {
       transformers[[scope]][[transformer_names[i]]] <- NULL
     }
   }

diff --git a/tests/testthat/test-transformers-subset.R b/tests/testthat/test-transformers-subset.R
@@ -63,7 +63,7 @@ test_that("if no subset_transformers is specified, no transformer is removed and
 
 test_that('semi-colon is parsed without error', {
   expect_equal(
-    transformers_subset(c("a", ";", "b"), t_fun),
-    t_fun
+    transformers_subset(c("!a", ";", "b"), t),
+    t
   )
 })