git.iko.soy/typeable/pandoc
on master help sign in
Text.Pandoc.UTF8: Use strict bytestrings in reading.
aab4c47John MacFarlane
src/Text/Pandoc/UTF8.hs+1−1
@@ -85,7 +85,7 @@ hPutStrLn :: Handle -> String -> IO ()
85hPutStrLn h s = hSetEncoding h utf8 >> IO.hPutStrLn h s
85hPutStrLn h s = hSetEncoding h utf8 >> IO.hPutStrLn h s
86
86
87hGetContents :: Handle -> IO String
87hGetContents :: Handle -> IO String
88−hGetContents = fmap toStringLazy . BL.hGetContents
88+hGetContents = fmap toString . B.hGetContents
89-- hGetContents h = hSetEncoding h utf8_bom
89-- hGetContents h = hSetEncoding h utf8_bom
90-- >> hSetNewlineMode h universalNewlineMode
90-- >> hSetNewlineMode h universalNewlineMode
91-- >> IO.hGetContents h
91-- >> IO.hGetContents h