Exports: Added ICML.

jgm · May 12, 2014 · 4927241 · 4927241
1 parent e005ea9
commit 4927241
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/Network/Gitit/Export.hs b/Network/Gitit/Export.hs
@@ -184,6 +184,10 @@ respondOrg :: String -> Pandoc -> Handler
 respondOrg = respondS "org" "text/plain; charset=utf-8" ""
   writeOrg defaultRespOptions
 
+respondICML :: String -> Pandoc -> Handler
+respondICML = respondS "icml" "application/xml; charset=utf-8" ""
+  writeICML defaultRespOptions
+
 respondTextile :: String -> Pandoc -> Handler
 respondTextile = respondS "textile" "text/plain; charset=utf-8" ""
   writeTextile defaultRespOptions
@@ -311,6 +315,7 @@ exportFormats cfg = if pdfExport cfg
                 , ("Plain text",respondPlain)
                 , ("MediaWiki", respondMediaWiki)
                 , ("Org-mode",  respondOrg)
+                , ("ICML",      respondICML)
                 , ("Textile",   respondTextile)
                 , ("AsciiDoc",  respondAsciiDoc)
                 , ("Man page",  respondMan)