summaryrefslogtreecommitdiff
path: root/src/Hakyll/Web/Pandoc.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <m@jaspervdj.be>2012-03-29 12:37:15 +0200
committerJasper Van der Jeugt <m@jaspervdj.be>2012-03-29 12:37:15 +0200
commit2c094ba80b1fa06fc60602a25acdf68af28a1682 (patch)
tree01b0c4f05047886254d1b1871a575511b6a9cce2 /src/Hakyll/Web/Pandoc.hs
parent13ec906b5f73511fa81e966a544a59af434064ed (diff)
downloadhakyll-2c094ba80b1fa06fc60602a25acdf68af28a1682.tar.gz
Add textile support
Diffstat (limited to 'src/Hakyll/Web/Pandoc.hs')
-rw-r--r--src/Hakyll/Web/Pandoc.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Hakyll/Web/Pandoc.hs b/src/Hakyll/Web/Pandoc.hs
index be6b544..8b0e0de 100644
--- a/src/Hakyll/Web/Pandoc.hs
+++ b/src/Hakyll/Web/Pandoc.hs
@@ -55,6 +55,7 @@ readPandocWith state fileType' id' = case fileType' of
readPandocWith state {stateLiterateHaskell = True} t id'
Markdown -> readMarkdown state
Rst -> readRST state
+ Textile -> readTextile state
t -> error $
"Hakyll.Web.readPandocWith: I don't know how to read a file of the " ++
"type " ++ show t ++ fromMaybe "" (fmap ((" for: " ++) . show) id')