From 007236e8eb7be4c1330542b7cc5f57266a4ad29f Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 27 Oct 2017 20:39:20 -0700 Subject: pandoc.hs - removed some cruft. --- pandoc.hs | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) (limited to 'pandoc.hs') diff --git a/pandoc.hs b/pandoc.hs index ad0e914be..55d826398 100644 --- a/pandoc.hs +++ b/pandoc.hs @@ -1,7 +1,3 @@ -{-# LANGUAGE CPP #-} - -{-# LANGUAGE ScopedTypeVariables #-} -{-# LANGUAGE TupleSections #-} {- Copyright (C) 2006-2017 John MacFarlane @@ -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)) -- cgit v1.2.3