@@ -863,7 +863,7 @@ definitionListItem parseMarkerGetLength = try $ do
863 line1 <- anyLineNewline
863 line1 <- anyLineNewline
864 blank <- option "" ("\n" <$ blankline)
864 blank <- option "" ("\n" <$ blankline)
865 cont <- concat <$> many (listContinuation markerLength)
865 cont <- concat <$> many (listContinuation markerLength)
866− term' <- parseFromString inline term
866+ term' <- parseFromString parseInlines term
867 contents' <- parseFromString parseBlocks $ line1 ++ blank ++ cont
867 contents' <- parseFromString parseBlocks $ line1 ++ blank ++ cont
868 return $ (,) <$> term' <*> fmap (:[]) contents'
868 return $ (,) <$> term' <*> fmap (:[]) contents'