tests/testthat/test-invalid-encoding.R

test_that("invalid encodings are handled", {
df <- data.frame(
    bad = "23\xbfC",
    good = "dummy",
    the_worst = "2015 President and Vice-Chancellor\x92s Alumni Scholarship Appeal"
  )

  expect_snapshot(paint(df))
})
MilesMcBain/paint documentation built on Dec. 5, 2023, 9:11 a.m.