@@ -1,4 +1,4 @@
1−{-# LANGUAGE DeriveFunctor #-}
1+{-# LANGUAGE DeriveFunctor, DeriveDataTypeable #-}
22
33{-
44Copyright (C) 2016 Jesse Rosenthal <jrosenthal@jhu.edu>
@@ -90,6 +90,7 @@ import qualified System.FilePath.Glob as IO (glob)
9090import Control.Monad.State hiding (fail)
9191import Control.Monad.Reader hiding (fail)
9292import Data.Word (Word8)
93+import Data.Typeable
9394
9495data PandocActionF nxt =
9596 LookupEnv String (Maybe String -> nxt)
@@ -219,7 +220,7 @@ data TestEnv = TestEnv { envEnv :: [(String, String)]
219220 }
220221
221222data TestException = TestException
222− deriving (Show)
223+ deriving (Show, Typeable)
223224
224225instance E.Exception TestException
225226