tests/testthat/test_Helpers.R

test_that(".HandleUTF8", {
  expect_identical(.HandleUTF8("◨"), "◨")
  expect_identical(.HandleUTF8("abc"), paste0("&#", 97:99, ";", collapse = ""))

  # This could give trouble on a German installation on Windows
  #-expect_identical(.HandleUTF8("€"), "€")
  expect_identical(.HandleUTF8("€"), "€") # strangely in 'testthat' it works
})
SigurdJanson/shinyCSVImpoMod documentation built on Jan. 5, 2023, 3:57 a.m.