ConTeXt writer: improved autolink detection.
It previously failed in some cases with escaped special characters.
commitda507dcb84eb16629fdb1b65439557772c7214f8
authorJohn MacFarlane <jgm@berkeley.edu>
dateTue 12 Aug 2014, 15:49 (12 years ago)
parent60cf6e1
src/Text/Pandoc/Writers/ConTeXt.hs+1−1
@@ -297,7 +297,7 @@ inlineToConTeXt (Link txt (('#' : ref), _)) = do
297297 <> brackets (text ref)
298298
299299inlineToConTeXt (Link txt (src, _)) = do
300− let isAutolink = txt == [Str src]
300+ let isAutolink = txt == [Str (unEscapeString src)]
301301 st <- get
302302 let next = stNextRef st
303303 put $ st {stNextRef = next + 1}