summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/File.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-08 09:42:33 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-08 09:42:33 +0100
commit547f98dff029d011e6498c901190de11a0bc9c61 (patch)
tree39b4be2b4b6c2a03ae4fd21c6d0a5cbcd9ddcfa3 /src/Text/Hakyll/File.hs
parentd29e4157f1647b06367c2e04c1cdea4c8175fd4c (diff)
downloadhakyll-547f98dff029d011e6498c901190de11a0bc9c61.tar.gz
Added link function.
Diffstat (limited to 'src/Text/Hakyll/File.hs')
-rw-r--r--src/Text/Hakyll/File.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Hakyll/File.hs b/src/Text/Hakyll/File.hs
index c535b11..0c803e1 100644
--- a/src/Text/Hakyll/File.hs
+++ b/src/Text/Hakyll/File.hs
@@ -50,6 +50,7 @@ getRecursiveContents topdir = do
-- | A filter that takes all file names with a given extension. Prefix the
-- extension with a dot:
+--
-- > havingExtension ".markdown" ["index.markdown", "style.css"] == ["index.markdown"]
havingExtension :: String -> [FilePath] -> [FilePath]
havingExtension extension = filter ((==) extension . takeExtension)