diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2016-09-01 07:07:03 -0400 |
|---|---|---|
| committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2016-09-02 09:18:09 -0400 |
| commit | c613dbde01e8145ae10e0d85a8038cc336ea9ad0 (patch) | |
| tree | e19baaf9b84fb94d90d81b6e1e61c8917630998e /src | |
| parent | 7ea16ad058f6b2854cfae5cc241de95df601f7d7 (diff) | |
| download | pandoc-c613dbde01e8145ae10e0d85a8038cc336ea9ad0.tar.gz | |
Remove unnecessary CPP condition in UTF8
Base 4.4 is ghc 7.2, so we don't have to worry about getting a lower version.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/UTF8.hs | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/src/Text/Pandoc/UTF8.hs b/src/Text/Pandoc/UTF8.hs index 87ed5312b..62a662029 100644 --- a/src/Text/Pandoc/UTF8.hs +++ b/src/Text/Pandoc/UTF8.hs @@ -1,4 +1,3 @@ -{-# LANGUAGE CPP #-} {- Copyright (C) 2010-2016 John MacFarlane <jgm@berkeley.edu> @@ -116,11 +115,7 @@ fromStringLazy :: String -> BL.ByteString fromStringLazy = TL.encodeUtf8 . TL.pack encodePath :: FilePath -> FilePath -decodeArg :: String -> String -#if MIN_VERSION_base(4,4,0) encodePath = id + +decodeArg :: String -> String decodeArg = id -#else -encodePath = B.unpack . fromString -decodeArg = toString . B.pack -#endif |