DokuWiki writer: Use pointy brackets for email links.
(#1398)
commit80467d1b184a045a30db78f84084b7af76a5f89b
authorJohn MacFarlane <jgm@berkeley.edu>
dateSun 13 Jul 2014, 15:36 (12 years ago)
parentfbf7cbf
src/Text/Pandoc/Writers/DokuWiki.hs+2
@@ -419,6 +419,8 @@ inlineToDokuWiki opts (Link txt (src, _)) = do
419419 label <- inlineListToDokuWiki opts txt
420420 case txt of
421421 [Str s] | escapeURI s == src -> return src
422+ | "mailto:" ++ escapeURI s == src -> return $
423+ "<" ++ s ++ ">"
422424 _ -> if isURI src
423425 then return $ "[[" ++ src ++ "|" ++ label ++ "]]"
424426 else return $ "[[" ++ src' ++ "|" ++ label ++ "]]"