aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJesse Rosenthal <jrosenthal@jhu.edu>2016-11-21 19:04:39 -0500
committerJohn MacFarlane <jgm@berkeley.edu>2017-01-25 17:07:39 +0100
commit45f3c53dd9d540abac958b13783677c263aa6658 (patch)
tree10c5c6a6d0b8eb2326500e6aaef5a383476ee25c /src/Text/Pandoc
parent65953181423559c20a79ef1407843143991f3a46 (diff)
downloadpandoc-45f3c53dd9d540abac958b13783677c263aa6658.tar.gz
Class: Specify Functor and Applicative
We're still compiling for 7.8 which is pre-AMP, so let's just be explicit about it so we can use applicative notation.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Class.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Class.hs b/src/Text/Pandoc/Class.hs
index aca1067c6..2f5d179fe 100644
--- a/src/Text/Pandoc/Class.hs
+++ b/src/Text/Pandoc/Class.hs
@@ -67,7 +67,7 @@ import Control.Monad.Reader hiding (fail)
import Data.Word (Word8)
import Data.Typeable
-class Monad m => PandocMonad m where
+class (Functor m, Applicative m, Monad m) => PandocMonad m where
lookupEnv :: String -> m (Maybe String)
getCurrentTime :: m UTCTime
getDefaultReferenceDocx :: Maybe FilePath -> m Archive