tests/testthat/test_ui.R

context("preproc")

test_that("test i18n_state", {
  # empty input errors
  expect_error(i18n_state())
  # expect returning shiny tag
  expect_equal(class(i18n_state("a")), "shiny.tag")
})

Try the shiny.i18n package in your browser

Any scripts or data that you put into this service are public.

shiny.i18n documentation built on Jan. 16, 2023, 5:10 p.m.