@@ -20,7 +20,7 @@ import System.FilePath (takeDirectory)
20import System.FilePath.Glob (glob)
20import System.FilePath.Glob (glob)
21import System.Exit (exitFailure)
21import System.Exit (exitFailure)
22import System.IO (stderr, stdout, hPutStrLn, hSetEncoding, utf8)
22import System.IO (stderr, stdout, hPutStrLn, hSetEncoding, utf8)
23−import System.IO.UTF8 (readUTF8File)
23+import System.IO.UTF8 (readUTF8File, writeUTF8File)
24import System.Directory (createDirectoryIfMissing)
24import System.Directory (createDirectoryIfMissing)
26import Language.PureScript.Bundle
26import Language.PureScript.Bundle
@@ -110,7 +110,7 @@ main = do
110 case optionsOutputFile opts of
110 case optionsOutputFile opts of
111 Just outputFile -> do
111 Just outputFile -> do
112 createDirectoryIfMissing True (takeDirectory outputFile)
112 createDirectoryIfMissing True (takeDirectory outputFile)
113− writeFile outputFile js
113+ writeUTF8File outputFile js
114 Nothing -> putStrLn js
114 Nothing -> putStrLn js
116 infoModList = Opts.fullDesc <> headerInfo <> footerInfo
116 infoModList = Opts.fullDesc <> headerInfo <> footerInfo