Small change to referenceTitle: should end with line-end, not ')'.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@953 788f1e2b-df1e-0410-8736-df70ead52e1b
commit77f63605f5d0980588404d81528970fdddce4272
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
dateWed 29 Aug 2007, 01:53 (19 years ago)
parent21a2aca
src/Text/Pandoc/Readers/Markdown.hs+1−2
@@ -178,8 +178,7 @@ referenceTitle = try $ do
178178 skipSpaces
179179 tit <- (charsInBalanced '(' ')' >>= return . unwords . words)
180180 <|> do delim <- char '\'' <|> char '"'
181− manyTill anyChar (try (char delim >> skipSpaces >>
182− notFollowedBy (noneOf ")\n")))
181+ manyTill anyChar (try (char delim >> blankline))
183182 return $ decodeCharacterReferences tit
184183
185184noteMarker = string "[^" >> manyTill (noneOf " \t\n") (char ']')