R/set_cz.R

In jmunich/readMSMT: Retrieve data from MSMT CZ files

#' Sets locale to UTF-8 for working with czech characters
#'
#' @import tidyverse
#' @import readxl
#' @examples
#' set_cz()
#' @export

set_cz <- function(){
  if (.Platform$OS.type == 'windows') {
    Sys.setlocale(category = 'LC_ALL','English_United States.1250')
  } else {
    Sys.setlocale(category = 'LC_ALL','en_US.UTF-8')
  }
}