tests/testthat/test_generateEnc.R

context("generateEnc")

a <- generateEnc(list(list(text = 'Français', ascii = 'Francais')))

test_that("generateEnc", {
  expect_true(is.list(a))
  expect_length(a, 1)
  expect_equal(a[[1]], "\\enc{Français}{Francais}")
})
neonira/wyz.code.rdoc documentation built on Feb. 19, 2020, 12:47 p.m.