From a66c1bf88e511b73c6237bf6e85b57c5756321b7 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sat, 10 Dec 2016 23:30:42 +0100 Subject: Generic instance for PandocError. --- src/Text/Pandoc/Error.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Error.hs b/src/Text/Pandoc/Error.hs index f76749a80..b624f4cb0 100644 --- a/src/Text/Pandoc/Error.hs +++ b/src/Text/Pandoc/Error.hs @@ -34,6 +34,7 @@ module Text.Pandoc.Error (PandocError(..), handleError) where import Text.Parsec.Error import Text.Parsec.Pos hiding (Line) import Data.Generics (Typeable) +import GHC.Generics (Generic) import Control.Exception (Exception) import Text.Pandoc.Shared (err) @@ -44,7 +45,7 @@ data PandocError = PandocFileReadError FilePath | PandocSomeError String | PandocParseError String | PandocParsecError Input ParseError - deriving (Show, Typeable) + deriving (Show, Typeable, Generic) -- data PandocError = -- | Generic parse failure -- cgit v1.2.3