tests/testthat/test-tag_example.R

test_that("tag_example works", {

  tag <- tag_example(class = "myclass")
  expect_is(tag, "shiny.tag")
  expect_identical(tag$attribs$class, "myclass")
})

Try the gfonts package in your browser

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

gfonts documentation built on Jan. 9, 2023, 1:25 a.m.