diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2013-02-26 19:20:55 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2013-02-26 19:20:55 +0100 |
| commit | d993ebce58acee1e53ee5693743463c5c402919e (patch) | |
| tree | 3e8108bf28edd8903cb3ad5c7ebefcb8df748a71 /src/Hakyll/Core/Provider | |
| parent | ac527bd91e7f5a053f78a3bfa08525a290d82450 (diff) | |
| download | hakyll-d993ebce58acee1e53ee5693743463c5c402919e.tar.gz | |
Add testcase for #115
Diffstat (limited to 'src/Hakyll/Core/Provider')
| -rw-r--r-- | src/Hakyll/Core/Provider/Metadata.hs | 2 | ||||
| -rw-r--r-- | src/Hakyll/Core/Provider/MetadataCache.hs | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/src/Hakyll/Core/Provider/Metadata.hs b/src/Hakyll/Core/Provider/Metadata.hs index ee07e9f..74e16d4 100644 --- a/src/Hakyll/Core/Provider/Metadata.hs +++ b/src/Hakyll/Core/Provider/Metadata.hs @@ -2,6 +2,8 @@ -- | Internal module to parse metadata module Hakyll.Core.Provider.Metadata ( loadMetadata + , metadata + , page ) where diff --git a/src/Hakyll/Core/Provider/MetadataCache.hs b/src/Hakyll/Core/Provider/MetadataCache.hs index 2c97baa..077bad2 100644 --- a/src/Hakyll/Core/Provider/MetadataCache.hs +++ b/src/Hakyll/Core/Provider/MetadataCache.hs @@ -55,8 +55,8 @@ load p r = do Store.Found _ -> return () -- Not yet loaded _ -> do - (metadata, body) <- loadMetadata p r - Store.set store mdk metadata + (md, body) <- loadMetadata p r + Store.set store mdk md Store.set store bk body where store = providerStore p |