@@ -332,9 +332,8 @@ para = do
332 let f = if st /= ListItemState && indent >= 2 && indent < 6 then B.blockQuote else id
332 let f = if st /= ListItemState && indent >= 2 && indent < 6 then B.blockQuote else id
333 fmap (f . B.para) . trimInlinesF . mconcat <$> many1Till inline endOfParaElement
333 fmap (f . B.para) . trimInlinesF . mconcat <$> many1Till inline endOfParaElement
335− endOfParaElement = lookAhead $ endOfInput <|> newBlockElement
335+ endOfParaElement = lookAhead $ try (eof <|> newBlockElement)
336− endOfInput = try $ skipMany blankline >> skipSpaces >> eof
337− newBlockElement = try $ blankline >> void blockElements
336+ newBlockElement = blankline >> void blockElements
339noteMarker :: PandocMonad m => MuseParser m String
338noteMarker :: PandocMonad m => MuseParser m String
340noteMarker = try $ do
339noteMarker = try $ do