git.iko.soy/servant
on master help sign in
Add markdown type for text/xml
061bf7aIvan Lazar Miljenovic
servant-docs/src/Servant/Docs/Internal.hs+1
compare with master
unifiedsplit
@@ -647,6 +647,7 @@ markdown api = unlines $
647 case (M.mainType mime_type, M.subType mime_type) of
647 case (M.mainType mime_type, M.subType mime_type) of
648 ("text", "html") -> "html"
648 ("text", "html") -> "html"
649 ("application", "xml") -> "xml"
649 ("application", "xml") -> "xml"
650+ ("text", "xml") -> "xml"
650 ("application", "json") -> "javascript"
651 ("application", "json") -> "javascript"
651 ("application", "javascript") -> "javascript"
652 ("application", "javascript") -> "javascript"
652 ("text", "css") -> "css"
653 ("text", "css") -> "css"