From b246e8e9af10437e5850d533815bcf708a8da000 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Mon, 20 Feb 2017 15:44:33 +0100 Subject: Revert "Refined constraint for HasQuoteContext instance." This reverts commit 3c427fc17d53a564305aadde015dd2f048d9ff71. --- src/Text/Pandoc/Parsing.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Parsing.hs') diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs index 488b75e18..400d07f2a 100644 --- a/src/Text/Pandoc/Parsing.hs +++ b/src/Text/Pandoc/Parsing.hs @@ -960,7 +960,7 @@ class HasQuoteContext st m where getQuoteContext :: (Stream s m t) => ParsecT s st m QuoteContext withQuoteContext :: QuoteContext -> ParsecT s st m a -> ParsecT s st m a -instance PandocMonad m => HasQuoteContext ParserState m where +instance Monad m => HasQuoteContext ParserState m where getQuoteContext = stateQuoteContext <$> getState withQuoteContext context parser = do oldState <- getState -- cgit v1.2.3