From 21c44da17aa62e1147fbe6d36e8dcbe3ff43dd08 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Mon, 26 Aug 2019 15:25:39 -0700 Subject: Fix inline parsing in grid table cells. * T.P.Parsing: Change type of `setLastStrPos` so it takes a `Maybe SourcePos` rather than a `SourcePos`. [API change] * T.P.Parsing: Make `parseFromString'` and `gridTableWith` and `gridTableWith'` polymorphic in the parser state, constraining it with `HasLastStrPosition`. [API change] Closes #5708. --- src/Text/Pandoc/Readers/Org/ParserState.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Readers/Org') diff --git a/src/Text/Pandoc/Readers/Org/ParserState.hs b/src/Text/Pandoc/Readers/Org/ParserState.hs index aa9f2aee3..374741893 100644 --- a/src/Text/Pandoc/Readers/Org/ParserState.hs +++ b/src/Text/Pandoc/Readers/Org/ParserState.hs @@ -133,7 +133,7 @@ instance HasReaderOptions OrgParserState where instance HasLastStrPosition OrgParserState where getLastStrPos = orgStateLastStrPos - setLastStrPos pos st = st{ orgStateLastStrPos = Just pos } + setLastStrPos pos st = st{ orgStateLastStrPos = pos } instance Monad m => HasQuoteContext st (ReaderT OrgParserLocal m) where getQuoteContext = asks orgLocalQuoteContext -- cgit v1.2.3