diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-01-18 19:30:43 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-01-18 19:30:43 +0100 |
commit | 06408148eef18707c32cad4d06e293c65962fe5c (patch) | |
tree | 9852933ccb577e00f28cd681486c44561bc93eec /src/Text/Hakyll/File.hs | |
parent | 673ed68b8fd41c9420d353e6efd11d5405e53360 (diff) | |
parent | e01531bd7593b871d8fb18c5ea509394eb8785ba (diff) | |
download | hakyll-06408148eef18707c32cad4d06e293c65962fe5c.tar.gz |
Merge branch 'master' of git://github.com/seschwar/Hakyll into experimental
Conflicts:
hakyll.cabal
src/Text/Hakyll/Page.hs
src/Text/Hakyll/Render/Internal.hs
Diffstat (limited to 'src/Text/Hakyll/File.hs')
-rw-r--r-- | src/Text/Hakyll/File.hs | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/src/Text/Hakyll/File.hs b/src/Text/Hakyll/File.hs index 393c4a8..2a77707 100644 --- a/src/Text/Hakyll/File.hs +++ b/src/Text/Hakyll/File.hs @@ -42,7 +42,17 @@ 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" + , ".rst" + , ".text" + , ".tex" + ] then flip addExtension ".html" $ dropExtension path else path |