diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-19 14:59:55 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-19 14:59:55 +0100 |
| commit | 88ffd3c5bea6b5e5cb1004173130b5691a7591f6 (patch) | |
| tree | 8205d11882dc3a78f6ea03fe0adef390bc023670 /src/Hakyll/Core/Provider/MetadataCache.hs | |
| parent | 6b5c299ec945cdfea2dbf2df0922f8753588b729 (diff) | |
| download | hakyll-88ffd3c5bea6b5e5cb1004173130b5691a7591f6.tar.gz | |
Add tests again
Diffstat (limited to 'src/Hakyll/Core/Provider/MetadataCache.hs')
| -rw-r--r-- | src/Hakyll/Core/Provider/MetadataCache.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Provider/MetadataCache.hs b/src/Hakyll/Core/Provider/MetadataCache.hs index cd67370..03652e7 100644 --- a/src/Hakyll/Core/Provider/MetadataCache.hs +++ b/src/Hakyll/Core/Provider/MetadataCache.hs @@ -29,7 +29,7 @@ resourceBody p r = do load p r Store.Found bd <- Store.get (providerStore p) [name, toFilePath r, "body"] - maybe (resourceString r) return bd + maybe (resourceString p r) return bd -------------------------------------------------------------------------------- |