diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-10-27 20:39:20 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-10-27 20:39:20 -0700 |
commit | 007236e8eb7be4c1330542b7cc5f57266a4ad29f (patch) | |
tree | b75a4e7690a7ffe2168602d7baef84b182c43d9a | |
parent | ff16db1aa306113132cc6cfaa70791a0db75e0a5 (diff) | |
download | pandoc-007236e8eb7be4c1330542b7cc5f57266a4ad29f.tar.gz |
pandoc.hs - removed some cruft.
-rw-r--r-- | pandoc.hs | 8 |
1 files changed, 2 insertions, 6 deletions
@@ -1,7 +1,3 @@ -{-# LANGUAGE CPP #-} - -{-# LANGUAGE ScopedTypeVariables #-} -{-# LANGUAGE TupleSections #-} {- Copyright (C) 2006-2017 John MacFarlane <jgm@berkeley.edu> @@ -35,9 +31,9 @@ writers. module Main where import qualified Control.Exception as E import Text.Pandoc.App (convertWithOpts, defaultOpts, options, parseOptions) -import Text.Pandoc.Error (PandocError, handleError) +import Text.Pandoc.Error (handleError) main :: IO () main = E.catch (parseOptions options defaultOpts >>= convertWithOpts) - (\(e :: PandocError) -> handleError (Left e)) + (\e -> handleError (Left e)) |