diff options
Diffstat (limited to 'src/Text/Pandoc/Error.hs')
| -rw-r--r-- | src/Text/Pandoc/Error.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Error.hs b/src/Text/Pandoc/Error.hs index 36e9cca63..b6782036f 100644 --- a/src/Text/Pandoc/Error.hs +++ b/src/Text/Pandoc/Error.hs @@ -55,6 +55,7 @@ data PandocError = PandocIOError String IOError | PandocSyntaxMapError String | PandocFailOnWarningError | PandocPDFProgramNotFoundError String + | PandocPDFError String | PandocAppError Int String deriving (Show, Typeable, Generic) @@ -86,6 +87,7 @@ handleError (Left e) = PandocFailOnWarningError -> err 3 "Failing because there were warnings." PandocPDFProgramNotFoundError pdfprog -> err 47 $ pdfprog ++ " not found. " ++ pdfprog ++ " is needed for pdf output." + PandocPDFError log -> err 43 $ "Error producing PDF.\n" ++ log PandocAppError ec s -> err ec s err :: Int -> String -> IO a |