tests/testthat/test-glue.R

library(testthat)

test_that("emoji_glue works", {
  expect_equal(
    emoji_glue("I love :taco:s"),
    glue::glue("I love {emoji('taco')}s")
  )

  expect_error(emoji_glue(":wrong:"))
})

Try the emoji package in your browser

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

emoji documentation built on Oct. 30, 2024, 9:28 a.m.