with_mock_dir("t/meet", { test_that("cong_committee_meeting works", { x <- cong_committee_meeting() expect_s3_class(x, 'tbl_df') }) }) with_mock_dir("t/meet1", { test_that("cong_member with item works", { x <- cong_committee_meeting(congress = 118, chamber = 'house', number = '115538') expect_s3_class(x, 'tbl_df') }) })