summaryrefslogtreecommitdiff
path: root/src/Hakyll/Core/Resource/Provider.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Hakyll/Core/Resource/Provider.hs')
-rw-r--r--src/Hakyll/Core/Resource/Provider.hs45
1 files changed, 0 insertions, 45 deletions
diff --git a/src/Hakyll/Core/Resource/Provider.hs b/src/Hakyll/Core/Resource/Provider.hs
deleted file mode 100644
index 8f4c83f..0000000
--- a/src/Hakyll/Core/Resource/Provider.hs
+++ /dev/null
@@ -1,45 +0,0 @@
---------------------------------------------------------------------------------
--- | This module provides an wrapper API around the file system which does some
--- caching.
-module Hakyll.Core.Resource.Provider
- ( -- * Constructing resource providers
- ResourceProvider
- , newResourceProvider
-
- -- * Querying resource properties
- , resourceList
- , resourceExists
- , resourceModified
- , resourceModificationTime
-
- -- * Access to raw resource content
- , resourceString
- , resourceLBS
-
- -- * Access to metadata and body content
- , resourceMetadata
- , resourceBody
- ) where
-
-
---------------------------------------------------------------------------------
-import Hakyll.Core.Resource
-import qualified Hakyll.Core.Resource.MetadataCache as Internal
-import Hakyll.Core.Resource.Modified
-import Hakyll.Core.Resource.Provider.Internal
-
-
---------------------------------------------------------------------------------
--- | Wrapper to ensure metadata cache is invalidated if necessary
-resourceMetadata :: ResourceProvider -> Resource -> IO Metadata
-resourceMetadata rp r = do
- _ <- resourceModified rp r
- Internal.resourceMetadata rp r
-
-
---------------------------------------------------------------------------------
--- | Wrapper to ensure metadata cache is invalidated if necessary
-resourceBody :: ResourceProvider -> Resource -> IO String
-resourceBody rp r = do
- _ <- resourceModified rp r
- Internal.resourceBody rp r