From bf7e88cc0ac0c1c557e6dc29f01ffd3ebb0e3066 Mon Sep 17 00:00:00 2001
From: Hadley Wickham <h.wickham@gmail.com>
Date: Fri, 7 Feb 2025 09:17:58 -0600
Subject: [PATCH] Filter out curl status message in snapshot tets

---
 tests/testthat/test-resp-stream.R | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/tests/testthat/test-resp-stream.R b/tests/testthat/test-resp-stream.R
index 824a0a2f..5569fe03 100644
--- a/tests/testthat/test-resp-stream.R
+++ b/tests/testthat/test-resp-stream.R
@@ -349,7 +349,10 @@ test_that("verbosity = 3 shows raw sse events", {
 
   resp <- req_perform_connection(req, verbosity = 3)
   withr::defer(close(resp))
-  expect_snapshot(. <- resp_stream_sse(resp))
+  expect_snapshot(
+    . <- resp_stream_sse(resp),
+    transform = function(lines) lines[!grepl("^\\* ", lines)]
+  )
 })
 
 test_that("has a working find_event_boundary", {