Markdown reader: Further fix to abbrevs.
commit1a4a0d0283ef915d0e10fcb24027ff8bc93154e5
authorJohn MacFarlane <jgm@berkeley.edu>
dateMon 13 Dec 2010, 19:34 (16 years ago)
parent7b4d3c7
src/Text/Pandoc/Readers/Markdown.hs+1−1
@@ -1068,7 +1068,7 @@ str = do
10681068 [] -> return $ Str result
10691069 xs -> choice (map (\x ->
10701070 try (string x >> oneOf " \n" >>
1071− lookAhead letter >>
1071+ lookAhead alphaNum >>
10721072 return (Str $ result ++ spacesToNbr x ++ "\160"))) xs)
10731073 <|> (return $ Str result)
10741074 else return $ Str result