test_that("reprex: clipboard input works", {
skip_if_no_clipboard()
clipr::write_clip("1:5") #<- this line hangs
expect_match(reprex(render = FALSE), "^1:5$", all = FALSE)
})
Output from tests testthat results ================================================================ OK: 84 SKIPPED: 2 FAILED: 3
- Failure: reprex: clipboard input works (@test-input.R#14)
- Error: reprex() suppresses tidyverse startup message by default (@test-tidyverse.R#4)
- Error: reprex() has control over tidyverse startup message (@test-tidyverse.R#10)