Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Use parseFromString' in Muse reader.

Browse source 
Now that it is polymorphic, this is possible, and it's a
better choice because it resets last string pos.
This commit is contained in:
John MacFarlane 2019-08-26 15:30:58 -07:00
parent 21c44da17a
commit 1dec5bacaa
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/Readers/Muse.hs
View file

@ -676,7 +676,7 @@ museGridTableRow indent indices = try $ do
lns <- many1 $ try (indentWith indent *> museGridTableRawLine indices) lns <- many1 $ try (indentWith indent *> museGridTableRawLine indices)
let cols = map (unlines . map trimr) $ transpose lns let cols = map (unlines . map trimr) $ transpose lns
indentWith indent *> museGridTableHeader indentWith indent *> museGridTableHeader
sequence <$> mapM (parseFromString parseBlocks) cols sequence <$> mapM (parseFromString' parseBlocks) cols
museGridTableRawLine :: PandocMonad m museGridTableRawLine :: PandocMonad m
=> [Int] => [Int]