Moved relevant decoration expansion into formatters for rlistings fix #1038
GitHub Actions / Unit Tests Summary
failed
Jan 12, 2024 in 0s
1 fail, 197 pass in 1m 35s
Annotations
Check warning on line 0 in Pagination
github-actions / Unit Tests Summary
1 out of 4 runs failed: Pagination_works_with_non_default_min_siblings (Pagination)
rtables.Rcheck/tests/testthat/junit-result.xml [took 0s]
Raw output
`paginate_table(tt, lpp = 3, min_siblings = 1)` threw an error with unexpected message. ('test-pagination.R:450:3')
`paginate_table(tt, lpp = 3, min_siblings = 1)` threw an error with unexpected message.
Expected match: "Unable to find any valid pagination split between rows 1 and 1"
Actual message: "argument \"current_page\" is missing, with no default"
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-pagination.R:450:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─rtables::paginate_table(tt, lpp = 3, min_siblings = 1)
7. └─formatters::paginate_indices(...)
8. └─formatters::pag_indices_inner(...)
9. └─formatters:::find_pag(...)
10. └─formatters:::find_pag(...)
11. └─base::message(...)
12. └─base::.makeMessage(..., domain = domain, appendLF = appendLF)
13. └─base::lapply(list(...), as.character)
Loading