diff --git a/src/MdToHTML.hs b/src/MdToHTML.hs index 02cb9c0..fff6926 100644 --- a/src/MdToHTML.hs +++ b/src/MdToHTML.hs @@ -98,7 +98,7 @@ lookaheadParse stringCmp = do lineToList :: MdToken -> [MdToken] lineToList (Line tokens) = tokens -specialChars = "\\#*_[\n " +specialChars = "\\#*_[\n" -- Makes a parser greedy. Instead of returning all possible parses, only the longest one is returned. greedyParse :: ReadP a -> ReadP [a]