diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-02-21 17:30:13 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-02-21 17:30:13 +0100 |
| commit | 598ffa3a945603c4875d76df3236960ab2181733 (patch) | |
| tree | 70c5d5d487784cc808443804c9cde9989f957909 /src/Text/Pandoc/Readers/MediaWiki.hs | |
| parent | 7af3d90ae1ca43eb8354876c7dc2e8e2245f2274 (diff) | |
MediaWiki tables: allow extra hyphens after `|-` in tables.
I didn't see this documented anywhere, but it seems to be allowed
(and common).
See #2649. This addresses some of the cases there, but not all.
Diffstat (limited to 'src/Text/Pandoc/Readers/MediaWiki.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/MediaWiki.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs index 14f9da9b6..73177f531 100644 --- a/src/Text/Pandoc/Readers/MediaWiki.hs +++ b/src/Text/Pandoc/Readers/MediaWiki.hs @@ -264,7 +264,7 @@ tableEnd = try $ guardColumnOne *> skipSpaces *> sym "|}" rowsep :: PandocMonad m => MWParser m () rowsep = try $ guardColumnOne *> skipSpaces *> sym "|-" <* - optional parseAttr <* blanklines + many (char '-') <* optional parseAttr <* blanklines cellsep :: PandocMonad m => MWParser m () cellsep = try $ |