Use ansi_nchar() to compute widths (#1609)

Part of #1607
r-lib · Apr 25, 2022 · 0e03c40 · 0e03c40
1 parent 7307b47
commit 0e03c40
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/reporter-progress.R b/R/reporter-progress.R
@@ -521,14 +521,14 @@ issue_header <- function(x, pad = FALSE) {
 issue_summary <- function(x, rule = FALSE, simplify = "branch") {
   header <- crayon::bold(issue_header(x))
   if (rule) {
-    header <- cli::rule(header, width = max(nchar(header) + 6, 80))
+    header <- cli::rule(header, width = max(cli::ansi_nchar(header) + 6, 80))
   }
 
   paste0(header, "\n", format(x, simplify = simplify))
 }
 
 strpad <- function(x, width = cli::console_width()) {
-  n <- pmax(0, width - crayon::col_nchar(x))
+  n <- pmax(0, width - cli::ansi_nchar(x))
   paste0(x, strrep(" ", n))
 }