diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-09-15 11:21:39 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-09-15 11:21:39 -0400 |
| commit | 00e824fd0460d5275fc6c6730dd701623f3492c3 (patch) | |
| tree | 1eb5a32834edc89162a7bb73c4b4aee4f6a97a81 /src/Utility | |
| parent | 0d93f4f12c4c7d0a37dc2e6f792ce0f9dde793db (diff) | |
avoid a change to readProcess that I regretted in the morning
Seems better to keep handle encoding issues out of that module.
Diffstat (limited to 'src/Utility')
| -rw-r--r-- | src/Utility/Process.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/Utility/Process.hs b/src/Utility/Process.hs index 05205de8..c4882a01 100644 --- a/src/Utility/Process.hs +++ b/src/Utility/Process.hs @@ -60,7 +60,6 @@ import Prelude import Utility.Misc import Utility.Exception -import Utility.FileSystemEncoding type CreateProcessRunner = forall a. CreateProcess -> ((Maybe Handle, Maybe Handle, Maybe Handle, ProcessHandle) -> IO a) -> IO a @@ -82,7 +81,6 @@ readProcessEnv cmd args environ = readProcess' p readProcess' :: CreateProcess -> IO String readProcess' p = withHandle StdoutHandle createProcessSuccess p $ \h -> do - fileEncoding h output <- hGetContentsStrict h hClose h return output |