diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/Man.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Man.hs b/src/Text/Pandoc/Readers/Man.hs index 01c44066a..ecde31b9f 100644 --- a/src/Text/Pandoc/Readers/Man.hs +++ b/src/Text/Pandoc/Readers/Man.hs @@ -129,6 +129,7 @@ parseMan = do parseBlock :: PandocMonad m => ManParser m Blocks parseBlock = choice [ parseList , parseDefinitionList + , parseBlockQuote , parseTitle , parsePara , parseSkippedContent @@ -505,6 +506,9 @@ parseHeader = do let lvl = if name == "SH" then 1 else 2 return $ header lvl contents +parseBlockQuote :: PandocMonad m => ManParser m Blocks +parseBlockQuote = blockQuote <$> continuation + data ListType = Ordered ListAttributes | Bullet |