From 3574b98f81c2c24f7ef31f8251ba88792a2c06f0 Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Thu, 1 Dec 2016 12:13:51 -0500 Subject: Unify Errors. --- src/Text/Pandoc/Readers/OPML.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Text/Pandoc/Readers/OPML.hs') diff --git a/src/Text/Pandoc/Readers/OPML.hs b/src/Text/Pandoc/Readers/OPML.hs index 608e9ae0f..627566609 100644 --- a/src/Text/Pandoc/Readers/OPML.hs +++ b/src/Text/Pandoc/Readers/OPML.hs @@ -13,7 +13,7 @@ import Control.Monad.State import Data.Default import Control.Monad.Except import Text.Pandoc.Error -import Text.Pandoc.Class (PandocMonad, PandocExecutionError(..)) +import Text.Pandoc.Class (PandocMonad) type OPML m = StateT OPMLState m @@ -65,7 +65,7 @@ attrValue attr elt = Just z -> z Nothing -> "" --- exceptT :: PandocMonad m => Either PandocExecutionError a -> OPML m a +-- exceptT :: PandocMonad m => Either PandocError a -> OPML m a -- exceptT = either throwError return asHtml :: PandocMonad m => String -> OPML m Inlines -- cgit v1.2.3