summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/Page.hs
diff options
context:
space:
mode:
authorSebastian Schwarz <seschwar@googlemail.com>2010-01-18 17:51:28 +0100
committerSebastian Schwarz <seschwar@googlemail.com>2010-01-18 17:51:28 +0100
commit47fae0ed2a075d6e685963c1ce411fe28d1fcfd5 (patch)
treec25d451c7ce52e2217e103957060916c1b3230f6 /src/Text/Hakyll/Page.hs
parent20bde6c55c95b54e981fbfe4881c951002d2648f (diff)
downloadhakyll-47fae0ed2a075d6e685963c1ce411fe28d1fcfd5.tar.gz
Added support for other common Markdown file extensions.
Diffstat (limited to 'src/Text/Hakyll/Page.hs')
-rw-r--r--src/Text/Hakyll/Page.hs6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/Text/Hakyll/Page.hs b/src/Text/Hakyll/Page.hs
index 6788240..d338542 100644
--- a/src/Text/Hakyll/Page.hs
+++ b/src/Text/Hakyll/Page.hs
@@ -60,10 +60,8 @@ renderFunction ".html" = id
renderFunction ext = writeHtmlString writerOptions
. readFunction ext defaultParserState
where
- readFunction ".markdown" = readMarkdown
- readFunction ".md" = readMarkdown
- readFunction ".tex" = readLaTeX
- readFunction _ = readMarkdown
+ readFunction ".tex" = readLaTeX
+ readFunction _ = readMarkdown
-- | Read metadata header from a file handle.
readMetaData :: Handle -> IO [(String, String)]