git.iko.soy/typeable/pandoc
on master help sign in
Muse reader: fix reading of multiline definitions
commite32657a6713dc113d511f409f0eb1a7570915d28 authorAlexander Krotov <ilabdsf@gmail.com> dateWed 22 Nov 2017, 14:53 (9 years ago) parent3fdf046
1 file changed+2−2
src/Text/Pandoc/Readers/Muse.hs+2−2
src/Text/Pandoc/Readers/Muse.hs+2−2
@@ -467,8 +467,8 @@ definitionListItem = try $ do
467467 where
468468 termParser = (guardDisabled Ext_amuse <|> void spaceChar) >> -- Initial space is required by Amusewiki, but not Emacs Muse
469469 many spaceChar >>
470− many1Till anyChar (lookAhead (void (try (spaceChar >> string "::")) <|> void newline))
471− endOfInput = try $ skipMany blankline >> skipSpaces >> eof
470+ many1Till (noneOf "\n") (lookAhead (void (try (spaceChar >> string "::"))))
471+ endOfInput = lookAhead $ try $ skipMany blankline >> skipSpaces >> eof
472472 twoBlankLines = try $ blankline >> skipMany1 blankline
473473 newDefinitionListItem = try $ void termParser
474474 endOfListItemElement = lookAhead $ endOfInput <|> newDefinitionListItem <|> twoBlankLines