From 570e56c2845a5845abdd9ed58fd5789ae071c5fc Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Wed, 5 Aug 2015 07:22:34 +0200 Subject: Don't depend on locale at runtime either! #4 --- CabalHelper/Data.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/CabalHelper/Data.hs b/CabalHelper/Data.hs index c43ec1d..97e9988 100644 --- a/CabalHelper/Data.hs +++ b/CabalHelper/Data.hs @@ -32,7 +32,8 @@ withHelperSources :: (FilePath -> IO a) -> IO a withHelperSources action = withSystemTempDirectory "cabal-helper" $ \dir -> do let chdir = dir "CabalHelper" createDirectory chdir - forM_ sourceFiles $ \(fn, src) -> writeFile (chdir fn) src + forM_ sourceFiles $ \(fn, src) -> + BS.writeFile (chdir fn) $ UTF8.fromString src action dir sourceFiles :: [(FilePath, String)] -- cgit v1.2.3