From 49c8bd0a2e2c402d9431d416ad0a45ac232b0b3e Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sat, 28 Jan 2023 09:08:03 -0800
Subject: Textile reader: don't allow brackets in URLs.

Closes #8582.
---
 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 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
-- 
cgit v1.2.3