assert_character

[maelle]

assert_character <- function(x, name) {
  if (!inherits(x, "character")) {
    cli::cli_abort("{.arg {name}} must be a character, not {.obj_type_friendly {x}}.")
  }
}