diff options
author | Joey Hess <joeyh@joeyh.name> | 2015-04-03 15:33:28 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2015-04-03 15:35:18 -0400 |
commit | 141937ed091643e2c47207f3818f46c7cf341189 (patch) | |
tree | 102dfcdef294cdc0ca6404232962749d213fac41 /Utility/SimpleProtocol.hs | |
parent | fff817f70ce3c86d873775c0d113b074cc486ff8 (diff) |
rename bothHandles -> ioHandles
Diffstat (limited to 'Utility/SimpleProtocol.hs')
-rw-r--r-- | Utility/SimpleProtocol.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Utility/SimpleProtocol.hs b/Utility/SimpleProtocol.hs index 4a2d8635e..52284d457 100644 --- a/Utility/SimpleProtocol.hs +++ b/Utility/SimpleProtocol.hs @@ -16,7 +16,7 @@ module Utility.SimpleProtocol ( parse1, parse2, parse3, - ioHandles, + dupIoHandles, ) where import Data.Char @@ -80,8 +80,8 @@ splitWord = separate isSpace - will mess up the protocol. To avoid that, close stdin, and - and duplicate stderr to stdout. Return two new handles - that are duplicates of the original (stdin, stdout). -} -ioHandles :: IO (Handle, Handle) -ioHandles = do +dupIoHandles :: IO (Handle, Handle) +duoIoHandles = do readh <- hDuplicate stdin writeh <- hDuplicate stdout nullh <- openFile devNull ReadMode |