git.iko.soy/typeable/pandoc
on master help sign in
ConTeXt writer: improved autolink detection.
da507dcJohn MacFarlane
src/Text/Pandoc/Writers/ConTeXt.hs+1−1
@@ -297,7 +297,7 @@ inlineToConTeXt (Link txt (('#' : ref), _)) = do
297 <> brackets (text ref)
297 <> brackets (text ref)
298
298
299inlineToConTeXt (Link txt (src, _)) = do
299inlineToConTeXt (Link txt (src, _)) = do
300− let isAutolink = txt == [Str src]
300+ let isAutolink = txt == [Str (unEscapeString src)]
301 st <- get
301 st <- get
302 let next = stNextRef st
302 let next = stNextRef st
303 put $ st {stNextRef = next + 1}
303 put $ st {stNextRef = next + 1}