aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Markdown.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Readers/Markdown.hs')
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index fb8910583..e9ed32f5f 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -962,9 +962,9 @@ table :: Parser [Char] ParserState Block
table = try $ do
frontCaption <- option [] tableCaption
Table _ aligns widths heads lines' <-
+ try (scanForPipe >> (pipeTable True <|> pipeTable False)) <|>
multilineTable False <|> simpleTable True <|>
simpleTable False <|> multilineTable True <|>
- (scanForPipe >> (pipeTable False <|> pipeTable True)) <|>
gridTable False <|> gridTable True <?> "table"
caption <- if null frontCaption
then option [] tableCaption