diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-05-04 08:07:17 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-05-04 08:07:17 -0700 |
| commit | 3e42f08e87c4795b260154e9747df29bc1613ccc (patch) | |
| tree | e17a507a487dd9df279ed724398c7e86c95f4518 /src/Text | |
| parent | 6b532c2131f13f5c294dcea88a8d041f8be388dd (diff) | |
Markdown reader: Fixed bug with unwanted code in lists.
Closes #1154.
When reading a raw list item, we now strip off nonindent
spaces.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 36f73d847..69245cf66 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -746,6 +746,7 @@ listLine = try $ do many spaceChar listStart) notFollowedBy' $ htmlTag (~== TagClose "div") + nonindentSpaces chunks <- manyTill ( many1 (satisfy $ \c -> c /= '\n' && c /= '<') <|> liftM snd (htmlTag isCommentTag) |