From 88ffd3c5bea6b5e5cb1004173130b5691a7591f6 Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Mon, 19 Nov 2012 14:59:55 +0100 Subject: Add tests again --- src/Hakyll/Core/Provider/MetadataCache.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Hakyll/Core/Provider/MetadataCache.hs') 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 -------------------------------------------------------------------------------- -- cgit v1.2.3