tests/testthat/test-substitution.R

context("substitution")

setup(start_app())
teardown(stop_app())

test_that("glue errors", {
  expect_error(cli_h1("foo { asdfasdfasdf } bar"))
  expect_error(cli_text("foo {cmd {dsfsdf()}}"))
})
r-lib/cliapp documentation built on Nov. 9, 2023, 11:18 a.m.