diff --git a/R/reporter-progress.R b/R/reporter-progress.R index 726ffb411..c34ed1649 100644 --- a/R/reporter-progress.R +++ b/R/reporter-progress.R @@ -534,7 +534,9 @@ issue_header <- function(x, pad = FALSE) { issue_summary <- function(x, rule = FALSE) { header <- cli::style_bold(issue_header(x)) if (rule) { - header <- cli::rule(header) + # Don't truncate long test names + width <- max(cli::ansi_nchar(header) + 6, getOption("width")) + header <- cli::rule(header, width = width) } paste0(header, "\n", format(x))