Merge pull request swirldev#229 from swirldev/w1252

Force UTF-8 encoding of message in swirl_out to solve WINDOWS-1252 "umlaut" problem.
jahannusrat · Nov 20, 2014 · e1370b8 · e1370b8
2 parents ee14f20 + 0c007d4
commit e1370b8
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/utilities.R b/R/utilities.R
@@ -4,6 +4,7 @@ swirl_out <- function(..., skip_before=TRUE, skip_after=FALSE) {
   mes <- str_c("| ", wrapped, collapse = "\n")
   if(skip_before) mes <- paste0("\n", mes)
   if(skip_after) mes <- paste0(mes, "\n")
+  Encoding(mes) <- "UTF-8"
   message(mes)
 }