diff options
author | Joey Hess <joey@kitenet.net> | 2012-03-09 19:08:10 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-03-09 19:08:10 -0400 |
commit | d6e77595ba45762b3c2dfdcd47a2d6b5b70154ae (patch) | |
tree | 896615a59c8f67f3bfec97c55616b7e59017927b /Utility/Misc.hs | |
parent | 789254747bceeaac004236275a6c1906f859945a (diff) |
factor out Utility.FileSystemEncoding
Diffstat (limited to 'Utility/Misc.hs')
-rw-r--r-- | Utility/Misc.hs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/Utility/Misc.hs b/Utility/Misc.hs index 9c284c826..3ac5ca5c0 100644 --- a/Utility/Misc.hs +++ b/Utility/Misc.hs @@ -9,14 +9,6 @@ module Utility.Misc where import System.IO import Control.Monad -import GHC.IO.Encoding - -{- Sets a Handle to use the filesystem encoding. This causes data - - written or read from it to be encoded/decoded the same - - as ghc 7.4 does to filenames et. This special encoding - - allows "arbitrary undecodable bytes to be round-tripped through it". -} -fileEncoding :: Handle -> IO () -fileEncoding h = hSetEncoding h =<< getFileSystemEncoding {- A version of hgetContents that is not lazy. Ensures file is - all read before it gets closed. -} |