More code simp in pandoc.hs.

This commit is contained in:
John MacFarlane 2017-10-27 20:58:54 -07:00
parent 007236e8eb
commit 7a924ec55a

View file

@ -35,5 +35,5 @@ import Text.Pandoc.Error (handleError)
main :: IO ()
main = E.catch (parseOptions options defaultOpts >>= convertWithOpts)
(\e -> handleError (Left e))
(handleError . Left)