git.iko.soy/hakyll
on master help sign in
add support for mediawiki
commit4412807ffd2e26b18616fd0a740a494f2c493b64 author80x24 <80x24@momoka.net> dateSun 14 Jun 2015, 20:19 (11 years ago) parenteb4ea43
2 files changed+24−20
compare with master
unifiedsplit
src/Hakyll/Web/Pandoc.hs+1 src/Hakyll/Web/Pandoc/FileType.hs+23−20
src/Hakyll/Web/Pandoc.hs+1
@@ -63,6 +63,7 @@ readPandocWith ropt item =
6363 LaTeX -> readLaTeX ro
6464 LiterateHaskell t' -> reader (addExt ro Ext_literate_haskell) t'
6565 Markdown -> readMarkdown ro
66+ MediaWiki -> readMediaWiki ro
6667 OrgMode -> readOrg ro
6768 Rst -> readRST ro
6869 Textile -> readTextile ro
src/Hakyll/Web/Pandoc/FileType.hs+23−20
@@ -27,6 +27,7 @@ data FileType
2727 | LaTeX
2828 | LiterateHaskell FileType
2929 | Markdown
30+ | MediaWiki
3031 | OrgMode
3132 | PlainText
3233 | Rst
@@ -39,30 +40,32 @@ data FileType
3940fileType :: FilePath -> FileType
4041fileType = uncurry fileType' . splitExtension
4142 where
42− fileType' _ ".css" = Css
43− fileType' _ ".dbk" = DocBook
44− fileType' _ ".htm" = Html
45− fileType' _ ".html" = Html
46− fileType' f ".lhs" = LiterateHaskell $ case fileType f of
43+ fileType' _ ".css" = Css
44+ fileType' _ ".dbk" = DocBook
45+ fileType' _ ".htm" = Html
46+ fileType' _ ".html" = Html
47+ fileType' f ".lhs" = LiterateHaskell $ case fileType f of
4748 -- If no extension is given, default to Markdown + LiterateHaskell
4849 Binary -> Markdown
4950 -- Otherwise, LaTeX + LiterateHaskell or whatever the user specified
5051 x -> x
51− fileType' _ ".markdown" = Markdown
52− fileType' _ ".md" = Markdown
53− fileType' _ ".mdn" = Markdown
54− fileType' _ ".mdown" = Markdown
55− fileType' _ ".mdwn" = Markdown
56− fileType' _ ".mkd" = Markdown
57− fileType' _ ".mkdwn" = Markdown
58− fileType' _ ".org" = OrgMode
59− fileType' _ ".page" = Markdown
60− fileType' _ ".rst" = Rst
61− fileType' _ ".tex" = LaTeX
62− fileType' _ ".text" = PlainText
63− fileType' _ ".textile" = Textile
64− fileType' _ ".txt" = PlainText
65− fileType' _ _ = Binary -- Treat unknown files as binary
52+ fileType' _ ".markdown" = Markdown
53+ fileType' _ ".mediawiki" = MediaWiki
54+ fileType' _ ".md" = Markdown
55+ fileType' _ ".mdn" = Markdown
56+ fileType' _ ".mdown" = Markdown
57+ fileType' _ ".mdwn" = Markdown
58+ fileType' _ ".mkd" = Markdown
59+ fileType' _ ".mkdwn" = Markdown
60+ fileType' _ ".org" = OrgMode
61+ fileType' _ ".page" = Markdown
62+ fileType' _ ".rst" = Rst
63+ fileType' _ ".tex" = LaTeX
64+ fileType' _ ".text" = PlainText
65+ fileType' _ ".textile" = Textile
66+ fileType' _ ".txt" = PlainText
67+ fileType' _ ".wiki" = MediaWiki
68+ fileType' _ _ = Binary -- Treat unknown files as binary
6669
6770
6871--------------------------------------------------------------------------------