aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2014-09-27 22:37:54 +0100
committerMatthew Pickering <matthewtpickering@gmail.com>2014-09-27 22:40:25 +0100
commit5cb475c37491db4bdffebfd06e55984ff118c10b (patch)
treefa1a3e5a1b89dad397a7230db190433f1761609c /src/Text/Pandoc
parent6740a9592a4cc20b501ea5c8d35c9fcb27203af0 (diff)
downloadpandoc-5cb475c37491db4bdffebfd06e55984ff118c10b.tar.gz
Org Reader: Parse multi-inline terms correctly in definition list
Closes #1649
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/Org.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Org.hs b/src/Text/Pandoc/Readers/Org.hs
index b07f96846..5c00a1b27 100644
--- a/src/Text/Pandoc/Readers/Org.hs
+++ b/src/Text/Pandoc/Readers/Org.hs
@@ -863,7 +863,7 @@ definitionListItem parseMarkerGetLength = try $ do
line1 <- anyLineNewline
blank <- option "" ("\n" <$ blankline)
cont <- concat <$> many (listContinuation markerLength)
- term' <- parseFromString inline term
+ term' <- parseFromString parseInlines term
contents' <- parseFromString parseBlocks $ line1 ++ blank ++ cont
return $ (,) <$> term' <*> fmap (:[]) contents'