R/utils.R

In PolMine/polmineR.shiny: Shiny apps and widgets to expand the polmineR package

#' Rectify special characters.
#' 
#' @param x character vector to work on
#' @export rectifySpecialChars
rectifySpecialChars <- function(x){
  x <- gsub('\u201E', '"', x)
  x <- gsub('\u201C', '"', x) 
  x
}