skip file snapshots on non-mac

r-lib · May 6, 2024 · 549fff3 · 549fff3
1 parent 5856343
commit 549fff3
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/tests/testthat/test-parse.R b/tests/testthat/test-parse.R
@@ -3,11 +3,13 @@ test_that("parse works", {
   expect_s3_class(parsed, "marquee_parsed")
   expect_true(is_parsed(parsed))
 
-  file <- tempfile()
-  write.csv(parsed[, !names(parsed) %in% c("background", "features", "bullets")], file)
-  expect_snapshot_file(file, "parsed.csv")
-
   parsed_with_html <- marquee_parse(markdown_test, ignore_html = FALSE)
   expect_equal(parsed$text[-17], parsed_with_html$text[-17])
   expect_equal(parsed_with_html$text[17], " lines. <span>WHAT</span>")
+
+  skip_on_os("windows")
+  skip_on_os("linux")
+  file <- tempfile()
+  write.csv(parsed[, !names(parsed) %in% c("background", "features", "bullets")], file)
+  expect_snapshot_file(file, "parsed.csv")
 })