Move transformation to correct place

tidyverse · Jan 23, 2024 · 562d3ae · 562d3ae
1 parent 74ad186
commit 562d3ae
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/tests/testthat/helper.R b/tests/testthat/helper.R
@@ -24,7 +24,7 @@ app_request <- function() {
 
 show_response <- function(x) {
   strip_divider <- function(x) {
-    gsub("-{3,}[a-f0-9]+", "---<divider>", x)
+    gsub("-{3,}[A-Za-z0-9-]+", "---{divider}", x)
   }
 
   x <- httr::content(x)

diff --git a/tests/testthat/test-form.R b/tests/testthat/test-form.R
@@ -207,5 +207,5 @@ test_that("can submit using three primary techniques", {
 
     form$enctype <- "multipart"
     show_response(html_form_submit(form))
-  }, transform = function(x) gsub("---.+$", "---{divider}", x))
+  })
 })