aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2013-05-20 10:43:12 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2013-05-20 10:43:12 -0700
commitc63e490ab2c33acf6ae06b6d8ef5043510a08a65 (patch)
tree0a14f9dd6e26ebd34316e01abdb72628eaef8345 /src/Text/Pandoc
parentb89a44303456da6db8aedfeecc8577fcfcb78274 (diff)
downloadpandoc-c63e490ab2c33acf6ae06b6d8ef5043510a08a65.tar.gz
MediaWiki reader: Skip attributes on table rows.
Previously we just crashed if rows had attributes, now we ignore them.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/MediaWiki.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs
index c4d169af0..2e8ad27e5 100644
--- a/src/Text/Pandoc/Readers/MediaWiki.hs
+++ b/src/Text/Pandoc/Readers/MediaWiki.hs
@@ -228,7 +228,8 @@ tableEnd :: MWParser ()
tableEnd = try $ guardColumnOne *> skipSpaces *> sym "|}"
rowsep :: MWParser ()
-rowsep = try $ guardColumnOne *> skipSpaces *> sym "|-" <* blanklines
+rowsep = try $ guardColumnOne *> skipSpaces *> sym "|-" <*
+ optional (void parseAttr) <* blanklines
cellsep :: MWParser ()
cellsep = try $