@@ -499,7 +499,7 @@ inlineToMarkdown opts (Image alternate (source, tit)) = do
499499 (alternate == [Str source]) -- to prevent autolinks
500500 then [Str "image"]
501501 else alternate
502− linkPart <- inlineToMarkdown opts (Link txt (unescapeURI source, tit))
502+ linkPart <- inlineToMarkdown opts (Link txt (source, tit))
503503 return $ "!" <> linkPart
504504inlineToMarkdown _ (Note contents) = do
505505 modify (\st -> st{ stNotes = contents : stNotes st })