7998587 · typeable/pandoc

git.iko.soy/typeable/pandoc

on master help sign in

Added CPP directives to avoid warnings.

7998587John MacFarlane13 years ago

src/Text/Pandoc/UTF8.hs+4

@@ -47,8 +47,12 @@ where

48import System.IO hiding (readFile, writeFile, getContents,

49 putStr, putStrLn, hPutStr, hPutStrLn, hGetContents)

50+#if MIN_VERSION_base(4,6,0)

51+import Prelude hiding (readFile, writeFile, getContents, putStr, putStrLn)

52+#else

50import Prelude hiding (readFile, writeFile, getContents, putStr, putStrLn,

53import Prelude hiding (readFile, writeFile, getContents, putStr, putStrLn,

51 catch)

54 catch)

55+#endif

52import qualified System.IO as IO

56import qualified System.IO as IO

53import qualified Data.ByteString.Char8 as B

57import qualified Data.ByteString.Char8 as B

54import qualified Data.ByteString.Lazy as BL

58import qualified Data.ByteString.Lazy as BL

src/Text/Pandoc/Writers/EPUB.hs+3

@@ -56,7 +56,10 @@ import Text.Pandoc.Writers.Markdown ( writePlain )

56import Data.Char ( toLower )

57import Network.URI ( isAbsoluteURI, unEscapeString )

58import Text.Pandoc.MIME (getMimeType)

59+#if MIN_VERSION_base(4,6,0)

60+#else

59import Prelude hiding (catch)

61import Prelude hiding (catch)

62+#endif

60import Control.Exception (catch, SomeException)

63import Control.Exception (catch, SomeException)

61#if MIN_VERSION_blaze_html(0,5,0)

64#if MIN_VERSION_blaze_html(0,5,0)

62import Text.Blaze.Html.Renderer.Utf8 (renderHtml)

65import Text.Blaze.Html.Renderer.Utf8 (renderHtml)