From 27762affe3edd13ccb62a5450166b28fe73d15e6 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 22 Jul 2016 15:45:03 -0700 Subject: Textile reader: disallow empty URL in explicit link. Closes #3036. --- src/Text/Pandoc/Readers/Textile.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs index 25d687c1f..4ab0243fe 100644 --- a/src/Text/Pandoc/Readers/Textile.hs +++ b/src/Text/Pandoc/Readers/Textile.hs @@ -594,7 +594,7 @@ link = try $ do then char ']' else lookAhead $ space <|> try (oneOf "!.,;:" *> (space <|> newline)) - url <- manyTill nonspaceChar stop + url <- many1Till nonspaceChar stop let name' = if B.toList name == [Str "$"] then B.str url else name return $ if attr == nullAttr then B.link url "" name' -- cgit v1.2.3