diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-02-19 17:04:50 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-02-19 17:04:50 +0100 |
commit | f04efbad3ed6f5cbc215f8aa72b1bd0203712768 (patch) | |
tree | c32ff0981e158739ea1bca085f1e0f3d8a73c4e6 /src/Hakyll/Core/ResourceProvider | |
parent | b89aad6178b151a859469a3ae5c6ed4e6f57cad6 (diff) | |
download | hakyll-f04efbad3ed6f5cbc215f8aa72b1bd0203712768.tar.gz |
Preview/INotify now works
Diffstat (limited to 'src/Hakyll/Core/ResourceProvider')
-rw-r--r-- | src/Hakyll/Core/ResourceProvider/FileResourceProvider.hs | 8 |
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 |