aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2023-01-28 09:08:03 -0800
committerJohn MacFarlane <[email protected]>2023-01-28 09:08:03 -0800
commit49c8bd0a2e2c402d9431d416ad0a45ac232b0b3e (patch)
treeba751ef5d36879692c1f5e2d7bb7e326e962565e /src
parentdba779cf1ff11c9bfa82dbca1eef7362c6b183b0 (diff)
Textile reader: don't allow brackets in URLs.
Closes #8582.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/Textile.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs
index 986408852..e55d8e1eb 100644
--- a/src/Text/Pandoc/Readers/Textile.hs
+++ b/src/Text/Pandoc/Readers/Textile.hs
@@ -618,7 +618,7 @@ linkUrl bracketed = do
char ':'
let stop = if bracketed
then char ']'
- else lookAhead $ space <|> eof' <|>
+ else lookAhead $ space <|> eof' <|> oneOf "[]" <|>
try (oneOf "!.,;:*" *>
(space <|> newline <|> eof'))
T.pack <$> many1Till nonspaceChar stop