tests/testthat/test-button.R

In nteetor/dull: A Reactive Web Framework Built on 'shiny'

context("button input")

test_that("argument id must be character or null", {
  expect_missing_id_error(buttonInput())
  expect_error(buttonInput(id = 1, label = "LABEL"))

  expect_silent(buttonInput(id = "ID", label = "LABEL"))
})

test_that("has dependencies", {
  expect_dependencies(buttonInput(id = "ID", label = "LABEL"))
})