R/utilities.R
is_char_one.Rd
returns true if x is a length 1 character vector
is_char_one(x)
a character vector