diff options
| -rw-r--r-- | CabalHelper/Data.hs | 3 |
1 files changed, 2 insertions, 1 deletions
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)] |