diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-02-21 18:34:21 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-02-21 18:34:21 +0100 |
| commit | 1d06e8c5a5e34d7d1373b1c2839ebf57a2fc0546 (patch) | |
| tree | c5a97925db664141b2ad0f35e71c18eb6d286c6e /src/Text/Pandoc/Readers/MediaWiki.hs | |
| parent | 598ffa3a945603c4875d76df3236960ab2181733 (diff) | |
MediaWiki reader: Allow blank line after table start.
See #2649.
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 73177f531..f0d01136f 100644 --- a/src/Text/Pandoc/Readers/MediaWiki.hs +++ b/src/Text/Pandoc/Readers/MediaWiki.hs @@ -219,7 +219,7 @@ para = do table :: PandocMonad m => MWParser m Blocks table = do tableStart - styles <- option [] parseAttrs <* blankline + styles <- option [] parseAttrs <* blanklines let tableWidth = case lookup "width" styles of Just w -> fromMaybe 1.0 $ parseWidth w Nothing -> 1.0 |