@@ -725,10 +725,6 @@ inlineToHtml opts inline =
725725 _ -> return mempty
726726 | f == Format "html" -> return $ preEscapedString str
727727 | otherwise -> return mempty
728− (Link [Str str] (s,_)) | "mailto:" `isPrefixOf` s &&
729− s == escapeURI ("mailto" ++ str) ->
730− -- autolink
731− return $ obfuscateLink opts str s
732728 (Link txt (s,_)) | "mailto:" `isPrefixOf` s -> do
733729 linkText <- inlineListToHtml opts txt
734730 return $ obfuscateLink opts (renderHtml linkText) s