Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Remove unnecessary CPP condition in UTF8

Browse source 
Base 4.4 is ghc 7.2, so we don't have to worry about getting a lower version.
This commit is contained in:
Jesse Rosenthal 2016-09-01 07:07:03 -04:00
parent 7ea16ad058
commit c613dbde01
1 changed files with 2 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/Text/Pandoc/UTF8.hs
View file

@ -1,4 +1,3 @@
{-# LANGUAGE CPP #-}
{- {-
Copyright (C) 2010-2016 John MacFarlane <jgm@berkeley.edu> Copyright (C) 2010-2016 John MacFarlane <jgm@berkeley.edu>
@ -116,11 +115,7 @@ fromStringLazy :: String -> BL.ByteString
fromStringLazy = TL.encodeUtf8 . TL.pack fromStringLazy = TL.encodeUtf8 . TL.pack
encodePath :: FilePath -> FilePath encodePath :: FilePath -> FilePath
decodeArg :: String -> String
#if MIN_VERSION_base(4,4,0)
encodePath = id encodePath = id
decodeArg :: String -> String
decodeArg = id decodeArg = id
#else
encodePath = B.unpack . fromString
decodeArg = toString . B.pack
#endif