aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/Man.hs4
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