Merge pull request #1296 from jvoigtlaender/patch-2

Set locale appropriately
elm · Apr 28, 2016 · 5643770 · 5643770
2 parents ec69a6c + a691999
commit 5643770
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/CommandLineRouter.hs b/src/CommandLineRouter.hs
@@ -5,13 +5,16 @@ import qualified System.Environment as Env
 import System.Exit (exitWith)
 import System.IO (hPutStrLn, stderr, stdin, stdout)
 import qualified System.Process as Proc
+import GHC.IO.Encoding (setLocaleEncoding, utf8)
 
 import qualified Elm.Compiler.Version as Compiler
 import qualified Elm.Package as Pkg
 
 main :: IO ()
 main =
-  do  allArgs <- Env.getArgs
+  do  setLocaleEncoding utf8
+
+      allArgs <- Env.getArgs
       case allArgs of
         [] ->
           putStrLn usageMessage