aboutsummaryrefslogtreecommitdiff
path: root/pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-06-01 15:09:38 +0200
committerJohn MacFarlane <jgm@berkeley.edu>2017-06-01 15:09:38 +0200
commit0cf6511f16388fc2bb71cffc733a704d20cfe3e3 (patch)
tree9672ee8b1eacbe95101210d919c185545e140fcc /pandoc.hs
parentc00471ca0d7a437ab25e0c425b88c48b1236801f (diff)
downloadpandoc-0cf6511f16388fc2bb71cffc733a704d20cfe3e3.tar.gz
Some hlint refactoring.
Diffstat (limited to 'pandoc.hs')
-rw-r--r--pandoc.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/pandoc.hs b/pandoc.hs
index 6135aec03..970fc8778 100644
--- a/pandoc.hs
+++ b/pandoc.hs
@@ -1,5 +1,5 @@
{-# LANGUAGE CPP #-}
-{-# LANGUAGE PatternGuards #-}
+
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE TupleSections #-}
{-
@@ -33,9 +33,9 @@ Parses command-line options and calls the appropriate readers and
writers.
-}
module Main where
-import Text.Pandoc.App (convertWithOpts, defaultOpts, options, parseOptions)
-import Text.Pandoc.Error (handleError, PandocError)
import qualified Control.Exception as E
+import Text.Pandoc.App (convertWithOpts, defaultOpts, options, parseOptions)
+import Text.Pandoc.Error (PandocError, handleError)
main :: IO ()
main = E.catch (parseOptions options defaultOpts >>= convertWithOpts)