diff options
Diffstat (limited to 'src/Text/Pandoc/Error.hs')
| -rw-r--r-- | src/Text/Pandoc/Error.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Error.hs b/src/Text/Pandoc/Error.hs index 637db6187..135cb3945 100644 --- a/src/Text/Pandoc/Error.hs +++ b/src/Text/Pandoc/Error.hs @@ -57,6 +57,7 @@ data PandocError = PandocIOError String IOError | PandocPDFProgramNotFoundError String | PandocPDFError String | PandocFilterError String String + | PandocCouldNotFindDataFileError String | PandocAppError String deriving (Show, Typeable, Generic) @@ -91,6 +92,8 @@ handleError (Left e) = PandocPDFError logmsg -> err 43 $ "Error producing PDF.\n" ++ logmsg PandocFilterError filtername msg -> err 83 $ "Error running filter " ++ filtername ++ ":\n" ++ msg + PandocCouldNotFindDataFileError fn -> err 97 $ + "Could not find data file " ++ fn PandocAppError s -> err 1 s err :: Int -> String -> IO a |