diff options
author | Sebastian Schwarz <seschwar@googlemail.com> | 2010-01-18 17:51:28 +0100 |
---|---|---|
committer | Sebastian Schwarz <seschwar@googlemail.com> | 2010-01-18 17:51:28 +0100 |
commit | 47fae0ed2a075d6e685963c1ce411fe28d1fcfd5 (patch) | |
tree | c25d451c7ce52e2217e103957060916c1b3230f6 /src/Text/Hakyll/File.hs | |
parent | 20bde6c55c95b54e981fbfe4881c951002d2648f (diff) | |
download | hakyll-47fae0ed2a075d6e685963c1ce411fe28d1fcfd5.tar.gz |
Added support for other common Markdown file extensions.
Diffstat (limited to 'src/Text/Hakyll/File.hs')
-rw-r--r-- | src/Text/Hakyll/File.hs | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/Text/Hakyll/File.hs b/src/Text/Hakyll/File.hs index 0ed91d5..2378ae9 100644 --- a/src/Text/Hakyll/File.hs +++ b/src/Text/Hakyll/File.hs @@ -39,7 +39,16 @@ toCache path = "_cache" </> (removeLeadingSeparator path) -- | Get the url for a given page. toURL :: FilePath -> FilePath -toURL path = if takeExtension path `elem` [".markdown", ".md", ".tex"] +toURL path = if takeExtension path `elem` [ ".markdown" + , ".md" + , ".mdn" + , ".mdwn" + , ".mkd" + , ".mkdn" + , ".mkdwn" + , ".text" + , ".tex" + ] then flip addExtension ".html" $ dropExtension path else path |