aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Man.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-10-25 12:35:58 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-10-25 12:35:58 -0700
commitd009a0fa525b6fa17bc34cf1a16f0b15c49366bd (patch)
treef1c4930a8cc774b009a92e1f59d166b2a304f713 /src/Text/Pandoc/Readers/Man.hs
parent31759731e754de9b37131229f65a5f8787b53a5d (diff)
downloadpandoc-d009a0fa525b6fa17bc34cf1a16f0b15c49366bd.tar.gz
Groff tokenizer: Add structured repr of table options.
Diffstat (limited to 'src/Text/Pandoc/Readers/Man.hs')
-rw-r--r--src/Text/Pandoc/Readers/Man.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Man.hs b/src/Text/Pandoc/Readers/Man.hs
index dc4ba3f52..9d40b40fb 100644
--- a/src/Text/Pandoc/Readers/Man.hs
+++ b/src/Text/Pandoc/Readers/Man.hs
@@ -113,7 +113,7 @@ parseTable :: PandocMonad m => ManParser m Blocks
parseTable = do
let isMTable (MTable{}) = True
isMTable _ = False
- MTable _aligns _rows pos <- msatisfy isMTable
+ MTable _opts _aligns _rows pos <- msatisfy isMTable
report $ SkippedContent "TABLE" pos
return $ B.para (B.text "TABLE")