Skip to content

Commit

Permalink
Markdown reader: Added updateStrPos in a couple places where needed.
Browse files Browse the repository at this point in the history
  • Loading branch information
jgm committed Oct 14, 2018
1 parent 2254748 commit 9b0bd4e
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/Text/Pandoc/Readers/Markdown.hs
Original file line number Diff line number Diff line change
Expand Up @@ -1586,6 +1586,7 @@ symbol = do
<|> try (do lookAhead $ char '\\'
notFollowedBy' (() <$ rawTeXBlock)
char '\\')
updateLastStrPos
return $ return $ B.str [result]

-- parses inline code, between n `s and n `s
Expand Down Expand Up @@ -1632,7 +1633,7 @@ enclosure c = do
3 -> three c
2 -> two c mempty
1 -> one c mempty
_ -> return (return $ B.str cs)
_ -> updateLastStrPos >> return (return $ B.str cs)

ender :: PandocMonad m => Char -> Int -> MarkdownParser m ()
ender c n = try $ do
Expand Down

0 comments on commit 9b0bd4e

Please sign in to comment.