mirror of
https://github.com/jgm/pandoc.git
synced 2026-09-24 15:44:59 +08:00
Fixed htmlComment parser.
(Added a needed try.) git-svn-id: https://pandoc.googlecode.com/svn/trunk@1621 788f1e2b-df1e-0410-8736-df70ead52e1b
This commit is contained in:
@@ -348,7 +348,7 @@ htmlComment :: GenParser Char st [Char]
|
||||
htmlComment = try $ do
|
||||
string "<!--"
|
||||
comment <- many $ noneOf "-"
|
||||
<|> try (char '-' >>~ notFollowedBy (char '-' >> char '>'))
|
||||
<|> try (char '-' >>~ notFollowedBy (try (char '-' >> char '>')))
|
||||
string "-->"
|
||||
return $ "<!--" ++ comment ++ "-->"
|
||||
|
||||
|
||||
Reference in New Issue
Block a user