summaryrefslogtreecommitdiff
path: root/src/Hakyll/Core/ResourceProvider
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2011-02-19 17:04:50 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2011-02-19 17:04:50 +0100
commitf04efbad3ed6f5cbc215f8aa72b1bd0203712768 (patch)
treec32ff0981e158739ea1bca085f1e0f3d8a73c4e6 /src/Hakyll/Core/ResourceProvider
parentb89aad6178b151a859469a3ae5c6ed4e6f57cad6 (diff)
downloadhakyll-f04efbad3ed6f5cbc215f8aa72b1bd0203712768.tar.gz
Preview/INotify now works
Diffstat (limited to 'src/Hakyll/Core/ResourceProvider')
-rw-r--r--src/Hakyll/Core/ResourceProvider/FileResourceProvider.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/Hakyll/Core/ResourceProvider/FileResourceProvider.hs b/src/Hakyll/Core/ResourceProvider/FileResourceProvider.hs
index 2f040b3..0d89b21 100644
--- a/src/Hakyll/Core/ResourceProvider/FileResourceProvider.hs
+++ b/src/Hakyll/Core/ResourceProvider/FileResourceProvider.hs
@@ -11,13 +11,15 @@ import qualified Data.ByteString.Lazy as LB
import Hakyll.Core.ResourceProvider
import Hakyll.Core.Identifier
import Hakyll.Core.Util.File
+import Hakyll.Core.Configuration
-- | Create a filesystem-based 'ResourceProvider'
--
-fileResourceProvider :: IO ResourceProvider
-fileResourceProvider = do
+fileResourceProvider :: HakyllConfiguration -> IO ResourceProvider
+fileResourceProvider configuration = do
-- Retrieve a list of identifiers
- list <- map parseIdentifier <$> getRecursiveContents False "."
+ list <- map parseIdentifier . filter (not . ignoreFile configuration) <$>
+ getRecursiveContents False "."
-- Construct a resource provider
return ResourceProvider