aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/Man.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Man.hs b/src/Text/Pandoc/Readers/Man.hs
index fb10e3613..54d2f059f 100644
--- a/src/Text/Pandoc/Readers/Man.hs
+++ b/src/Text/Pandoc/Readers/Man.hs
@@ -780,7 +780,7 @@ listItem mbListType = try $ do
| otherwise -> Ordered (start, listtype, DefaultDelim)
Left _ -> Bullet
guard $ listTypeMatches mbListType lt
- inls <- parseInlines
+ inls <- option mempty parseInlines
continuations <- mconcat <$> many continuation
return (lt, para inls <> continuations)
[] -> mzero
@@ -807,7 +807,7 @@ definitionListItem = try $ do
mmacro "TQ"
newterm <- parseInline
return newterm
- inls <- parseInlines
+ inls <- option mempty parseInlines
continuations <- mconcat <$> many continuation
return ( mconcat (intersperse B.linebreak (term:moreterms))
, [para inls <> continuations])