From d993ebce58acee1e53ee5693743463c5c402919e Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Tue, 26 Feb 2013 19:20:55 +0100 Subject: Add testcase for #115 --- src/Hakyll/Core/Provider/MetadataCache.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (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 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 -- cgit v1.2.3