@@ -106,7 +106,9 @@ obfuscateLink opts txt src =
106 else text' ++ " (" ++ name ++ " at " ++
106 else text' ++ " (" ++ name ++ " at " ++
107 domain' ++ ")" in
107 domain' ++ ")" in
108 if writerStrictMarkdown opts
108 if writerStrictMarkdown opts
109+ then -- need to use primHtml or &'s are escaped to & in URL
110+ primHtml $ "<a href=\"" ++ (obfuscateString src')
109− then anchor ! [href $ obfuscateString src'] << obfuscateString text'
111+ ++ "\">" ++ (obfuscateString text') ++ "</a>"
110 else (script ! [thetype "text/javascript"] $
112 else (script ! [thetype "text/javascript"] $
111 primHtml ("\n<!--\nh='" ++
113 primHtml ("\n<!--\nh='" ++
112 obfuscateString domain ++ "';a='" ++ at' ++ "';n='" ++
114 obfuscateString domain ++ "';a='" ++ at' ++ "';n='" ++