tests/testthat/test-hearing.R

In congress: Access the Congress.gov API

with_mock_dir('t/hearing', {
  test_that('cong_hearing works', {
    x <- cong_hearing()
    expect_s3_class(x, 'tbl_df')
  })
})

with_mock_dir('t/hearing1', {
  test_that('cong_hearing with item works', {
    x <- cong_hearing(congress = 116, chamber = 'house', number = 41365)
    expect_s3_class(x, 'tbl_df')
  })
})