@@ -5,13 +5,16 @@ import qualified System.Environment as Env
55import System.Exit (exitWith)
66import System.IO (hPutStrLn, stderr, stdin, stdout)
77import qualified System.Process as Proc
8+import GHC.IO.Encoding (setLocaleEncoding, utf8)
89
910import qualified Elm.Compiler.Version as Compiler
1011import qualified Elm.Package as Pkg
1112
1213main :: IO ()
1314main =
14− do allArgs <- Env.getArgs
15+ do setLocaleEncoding utf8
16+
17+ allArgs <- Env.getArgs
1518 case allArgs of
1619 [] ->
1720 putStrLn usageMessage