diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-04-04 14:34:39 +0200 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-04-04 14:35:00 +0200 |
commit | e650d1fbfd2e2486dac939638bde5c0d325da8a9 (patch) | |
tree | f85ec277786aa5ba7982d083e50d1e5171960eeb /src/Text/Pandoc/App.hs | |
parent | f1eb3b316904a20ccde4b60aa62977ad73e2d6a2 (diff) | |
download | pandoc-e650d1fbfd2e2486dac939638bde5c0d325da8a9.tar.gz |
Error: Added PandocOptionError.
Diffstat (limited to 'src/Text/Pandoc/App.hs')
-rw-r--r-- | src/Text/Pandoc/App.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/App.hs b/src/Text/Pandoc/App.hs index 886055849..107ca435f 100644 --- a/src/Text/Pandoc/App.hs +++ b/src/Text/Pandoc/App.hs @@ -97,7 +97,7 @@ parseOptions options' defaults = do let unknownOptionErrors = foldr handleUnrecognizedOption [] unrecognizedOpts unless (null errors && null unknownOptionErrors) $ - E.throwIO $ PandocAppError 2 $ + E.throwIO $ PandocOptionError $ concat errors ++ unlines unknownOptionErrors ++ ("Try " ++ prg ++ " --help for more information.") |