R/sanitise_col.R

In MilesMcBain/paint: paint data.frames summaries in colour

#' Attempt to transform chars in encodings we don't understand, rather than crash crayon.
#' @author Miles McBain
sanitise_col <- function(col) {
      sanitise_text(
        ifelse(!validEnc(col), stringi::stri_trans_general(col, "latin-ascii"), col)
      )
}