diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-06-16 21:26:50 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-06-16 21:26:50 -0700 |
| commit | f9b97e6bfb1d26bd328cdbb1ca83c4558e7f4a0c (patch) | |
| tree | 7f9493e07cf48eae385a21fd21f9963bd5ba9c6c /src/Text/Pandoc | |
| parent | 9da5d8955ecc090d1582a9d007a0ecace654d229 (diff) | |
| download | pandoc-f9b97e6bfb1d26bd328cdbb1ca83c4558e7f4a0c.tar.gz | |
Small improvement to fix to #1333.
This allows blank lines at end of multiline headers.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index c20a2a1fc..a6720beba 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1121,10 +1121,7 @@ multilineTableHeader headless = try $ do tableSep >> notFollowedBy blankline rawContent <- if headless then return $ repeat "" - else many1 $ do - notFollowedBy blankline - notFollowedBy tableSep - anyLine + else many1 $ notFollowedBy tableSep >> anyLine initSp <- nonindentSpaces dashes <- many1 (dashedLine '-') newline |